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The author, Melbourne-born Tim Hartnell, 
first met Dick Smith in London in the late 
seventies while Dick was on a trip to buy the 
helicopter which he used for his record- 
breaking world solo flight. 





The two kept in touch, and after Tim’s return from the UK at the end of 1982, Dick called 
him one day and asked him to come up to Sydney to see a new product which Dick Smith 
Electronics had developed. It was the VZ200, the forerunner of the VZ300. Tim was 
impressed with the machine and its potential, and rang the editor of Australian Personal 
Computer about it. The editor decided the launch of the VZ200 was sufficiently important 
to change, at the last minute, the proposed cover of the next issue of the magazine, and 
replace it with a photograph of the VZ200. Tim’s review of the computer was the lead story 
in that issue. 


Tim and a couple of authors who had worked with him previously on books published by 
Tim’s company, Interface Publications, then wrote three books on the V2200, which were 
distributed exclusively through Dick Smith outlets. The feedback on those books was 
extremely positive, so it was decided that the VZ300 also deserved dedicated books, such as 
the one you are reading now. 


Tim Hartnell originally left Australia in the middle of 1977 for the UK for what was planned 
to be a six month’s working holiday. He finally stayed for nearly six years, and while in 
London founded his company, Interface Publications, which now has offices in London, 
Melbourne and New York. Tim has written fifty or so books (he says he doesn’t know the 
exact number), predominately on computers and related subjects, and they have been 
translated into eleven languages. 


Although he now makes his home in Melbourne, he travels back to the USA and the UK two . 
or three times each year to keep in touch with developments in the computer field. “It gets 
harder to leave each time,” he said recently. “Australia is really the only country I ever want 
to live in. And with developments like the VZ300, it makes sense professionally, as well as 
personally.” 
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Forword 


You've just bought a great computer. The 
VZ300 was a wise buy. It shows just how far 
Computers have come since the old giant 
mainframes were first developed. 
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If you've never programmed a computer before 
this, and you'd Like to be able to program 
the VZ300 in just a few hours, then this is 
the book for you. 


With the help of this book, you'Ll find out 
the most important words for programming the 
VZ300. And, once you've worked through the 
book, you'Lt have a Library of interesting 
programs to keep you, and your computer, 
occupied for weeks to come. 


Tim Hartnell, 
MeLbourane, 19686 xi 
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Chapter One — Getting Started 


Don't worry if the VZ300 is the very first 
computer you have ever owned. We're going to 
take things slowly, and in small steps, so 


you should have no trouble in keeping up 
with me. 


READ THE BOOK WITH YOUR VZ300 TURNED ON 


It is vital that you have your VZ300- turned 
on at all times when reading this book (or 
at least the first time you work’ through 
it). This is an ‘action book! and, unlike a 
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novel, it is not designed simply to be read, 
This book is Like a book on how to drive. 
You could never Learn about changing gears, 
and how it feels to handle a car when 
crossing the Harbor Bridge, without actually 
going out and taking command of a vehicle. 


So it is with your VZ and this book. Try out 
each new command and function when it is 
explained to you, experiment with the games 
and other programs, and you'll find you're 
Learning to program without even trying. 


THE KEYBOARD 


The first thing we have to do in Learning to 
use the VZ3800 is to be able to use _ the 
keyboard. While not quite the same as a 
typewriter keyboard, it is not too far 
removed from it, and should present’ few 
problems. 


The keyboard tooks a Little daunting when 
first seen, but you'Lt discover that = you 
will feel quite confident about using it 
after only a few hours. 


We'LLl now look at the major functions of the 
keyboard step by step. 


THE CONTROL KEY 

The most important key on the VZ300 is’ the 
control key. It is Located above the SHIFT 
key on the Left hand side of the keyboard, 
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and is marked CTRL. This key gives you 
access to the ‘keywords! and ‘functions’ 
(which are written on the keys, above and 
below the main letter on each key). The CTRL 
key also controls the VZ's editing features. 


Holding down the control key, and pressing 
practically any other key, will give you the 
keyword written above the main letter 
written on the key. 


You'Lt see that the word FUNCTION is written 
on the RETURN key, which is the wide key 
just below the red Light on the right’ hand 
side of the keyboard. If you hold down CTRL, 
and the RETURN key at the same time, you'll 
be able to access the functions written 
below the letters on the keys. You can, of 
course, type out computer words such as 
PRINT in full, if you like, letter by 
Letter, instead of getting it in one press 
from a Key. 


When you press any key, without using the 
control key, then you'itl get the main 
character on that key. As well, on most of 
the keys you'Llt see a square which is. 
partially, or completely, filtled-in. These 
are graphic characters. 


KEYWORDS 


Keywords are important parts of programs. 
They are the sections of the program which 
actually telk the VZ300 what to do. The 
keywords are divided into two groups, 
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commands and functions. We'Ll Look at the 
commands first. 
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Many of the commands your VZ300 obeys’ are 
Like ordinary Aussie words. PRINT, for 
example, means just what it says, and teLls 
the VZ300 to print something on your TV 
screen, 


Program Lines are numbered, as you can see 
if you Look at some of the program Listings 
in this book, and the command GOTO (followed 
by a number) tells the VZ300 —- naturally 
enough — to GO TO that Line number. You'll 
be pleased to discover that you already know 
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a Large mumber of words used in the 
programming tLanguage BASIC, which is”~ the 
Language the VZ speaks. 


RUBOUT and INSERT 


These two keys — located towards the right 
of the third row of keys (on the 'L' and ';! 
keys) - are part of the VZ300's' editing 
system. INSERT makes room in a program Line 
for anew character or keyword, and RUBOUT 
removes a part of a program Line which is no 
Longer wanted. 


INSERT works by placing a space between any 
two characters ina line, so that you’ Can 
Later type in new Letters in that space. To 
use it, you just move the cursor (that black 
rectangle you can see on the screen) over 
the character which is where you want to 
place your new material, and opress-7 the 
INSERT key, over and over again, while 
holding down CTRL key with your Left hand, 
until you have aS many spaces as you need. 


To use the RUBOUT key, you must move the 
cursor to the beginning of the character or 
keyword you want to delete. Hold down CTRL 
and RUBOUT, and the Line witl disappear 
Leftward ‘under’ the cursor, 


To get to where you want to in a= program 
Listing on the screen, use the 'M', '<', '#>! 
and the space bar, to move the cursor in the 
direction indicated by the arrows printed on 
the keys. 
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SHIFTING 


There is, as I'm sure you've noticed, more 
than one character on most of the keys’ on 
your VZ. The symbols in the top right hand 
corner of each of the keys are punctuation 
marks, and graphic or arithmetic symbols. 
You get these characters by holding down the 
SHIFT key and pressing the relevant key at 
the same time. 


FUNCTIONS 


Functions are the second group of keywords 
(counting the commands, which we've just 
Looked at, as the first group). The 
functions are, for the most part, written 
below the main tbetter on each key. 
Functions are the 'thinking keywords'. That 
is, they are often called upon to make 
decisions while a program is running. 


Here's a simple example of a function in 
use: 


10 PRINT RNO(100);:GOTO 10 


If you typed this into your VZ, pressed the 
RETURN key afterwards, then typed in the 
word RUN’ (for get the word RUN by holding 
down the CTRL key and pressing the '6' key), 
and pressed the RETURN key again, you'd see 
numbers between 1 and 100 appear all over 
the screen. Press the BREAK key, in the top 
right hand corner of the keyboard, while 
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holding down the CTRL key, to stop’ the 
program running. 


THE CURSOR 


That flashing black rectangle which follows 
you as you type on the screen is called, as 
I pointed out aeshort time ago, the 
cursor. It has a number of uses. 


Because it can move to any part of the 
screen, it if very useful when you want” to 
edit, or change, part of a program Listing. 
For example, if you wanted to change the 100 
in the one-Line program given earlier into a 
90, you would first move the cursor to the 
beginning of the number 100. You do this 
with the versatile CTRL key, using the arrow 
on the full stop key, until the cursor is at 
at the beginning of tine 10. Then, stilt 
keeping CTRL down, you press the comma key 
until you are over the 7 in 100. 


Keep it pressed. If you go past the 1, don't 
worry. Just use the 'M!' key until you’ are 
over it again. Still keeping the CTRL key 
down, press RUBOUT once. The number should 
now be 00. Type in 5, which will cover the 
first 0. Then, Let go of the CTRL key and 
press RETURN over and over again, until the 
cursor is below the program line, and = you 
get the message: 


?0UT OF DATA ERROR 


Now type in RUN, and press the RETURN’ key 
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again, and numbers between 1 and 50 should 
appear on the screen. 


THE GRAPHICS MODES 


We' LL only touch on this subject briefly 
here, and then go into more detail in a 
Later chapter. Your VZ300 can operate in two 
graphics modes. The first one - MODE O - is 
the standard display mode we've been using 
to date. The second -—- MODE 1 - is a graphics 
mode, in which you can use coloured dots 
{called 'pixels' in computer-talk) to create 
pictures. 


To see MODE 1 in action, enter and run the 
next program: 


10 REM MODE DEMONSTRATION 
20 MODE {4) 

30 COLOR RND(4) ,1 

40 X=0:Y=0 

50 FOR N=1 TO 55 

66 SET (X,Y) 

70 X=X+1 sY=Y¥+1 

80 NEXT N 

90 GOTO 30 


To get back to MODE 0, hold down CTRL and 
press the BREAK key. 


INVERSE 


The INVERSE command, tocated on the’ colon 
(:) key, is used to provide inverse video 
{that is, Light writing on a dark back- 
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ground) for anything held within quote 
marks. {Note that your trusty VZ will nat 
accept keywords written in inverse.) 


Suppose, for example, you wanted to have a 
Line like the following in a program, = and 
you wanted to have the words within quote 
marks in inverse Letters: 


10 PRINT "THIS IS THE vz300o" 


You put your computer into inverse after the 
first quote mark by holding down the CTRL 
key and pressing the INVERSE (:) key, then 
type what you want. Follow’ the same 
procedure before you type in the - second 
quote mark to turn the video back to normal. 


Keep practicing on the VZ300 until you're 
used to the keyboard. You'll discover that 
the more you use your VZ, the more you'll 
Learn about its abilities and capabilities. 
Don't be afraid to experiment. You can't 
damage the VZ just by typing in commands. 


Well, now that you're familiar with the 
keyboard, it's time to go to chapter’ two, 
and start Learning to use the VZ300 itself. 


Chapter Two — First Steps in Programming 


Time now to take your first steps in 
programming. You'Ll be extremely pleased to 


see how simple and undemanding these first 
Steps will be. 
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We'LtL start learning to program the trusty 
VZ300 by using the most commonly-used 
command in BASIC, the keyword PRINT. 


Type the following into your VZ: 


PRINT 2 (Note that you’ can 
either spell PRINT 
in full, or use the 


CTRL key) 
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Until you press the RETURN key, the VZ3800 
will do nothing. Specifically, at this 
point, it will ignore the command PRINT ée. 
Press RETURN now, and you should see the 
number 2 appear underneath the words’ PRINT. 
2. This, pretty obviously, is the way PRINT 


works, It takes the information which 
follows the command PRINT, with afew 
exceptions which we will learn about 


shortly, and PRINTs this on the screen. This 


is, after all, exactly what you would expect 
it to do. 


But your VZ is not completely stupid. That 
is, it - can do more than just blindly print 
what you tell it to do. If the word PRINT is 
followed by a sum, it wilt work it out 
before printing, and given you the answer. 


Try it now. Enter the following Line, then 
press RETURN: 


PRINT 5 + 3 (You get + by 
typing SHIFT ;) 


You should see the figure 8 appear. The 
VZ300 added 5 and 3 together, as instructed 
by the plus sign, then printed the result on 
the screen. 


It can do subtraction as well (clever 
inventions, these Dick Smith computers). 
Type in the following, and press RETURN to 
see subtraction {and PRINT) at work: 


PRINT 7 - 2 
11 
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Now the VZ can, of course, carry out a wide 
range of mathematical tasks, many of them 
far more sophisticated that simple addition 
and subtraction. And it is pretty simple, as 
we've seen to tell the VZ what to do. 


It was not so simple in the early days of 
computers. In those days, the electronic 
brains did not understand English, or BASIC, 
and to program them, you had to talk to them 
in binary (Call O's and 1's). If there was a 
mistake in a program, a vast number of 1's 


ESO). 
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However, it is much simpler now. Just tell 


the VZ you wish to add, multiply, divide or 
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subtract, and it will do it for you 
virtually instantly. There is one tiny 
hitch. When it comes to multiplication, the 
computer doesn't use the X_ symbol you 


probably used at school. Instead, it uses an 
asterisk (*) for multiplication, and a slash 
(/) for divide. 


MORE THAN ONE THING AT ONCE 


The VZ300 is not Limited to ae single 
operation in a PRINT statement. You can 
combine just about as many as you Llike. Try 
the next one, which combines a multiplica- 
tion and a division. Type it in, then press 
RETURN to see the VZ work it out: 


PRINT 5*3/2 


This seems pretty simple. Just type in the 
word PRINT, follow it with the information 
you want the VZ to print, and that's all 
there is to it. 


But it is not quite as simple as that! Try 
the next one, and see what happens: 


PRINT TESTING 


That doesn't took too good when you try it, 
does it? Instead of the word TESTING, we got 
a zero. That's because the VZ300 thought we 
wanted a 'variabLle', rather than the word 
TESTING. Now, I'm not going to try = and 
explain the meaning of the word variable at 
this stage. We'll get to it Later. Briefly 
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though, it means simply that the VZ thought 
you wanted to print a number which had_ the 
name of TESTING. 


Silty machine. Computers may be fairly 
clever, but most of the time they need to be 
Led by the hand, like a very stupid human 
being (such as myself). Give a computer the 
right directions, and it will carry it out 
tirelessly and perfectly, without interven- 
tion from the human operator. 


But give them incorrect instructions, or - 
even worse — confuse them, and they give up 
in despair, or do something quite alien to 
your intentions. 


STRINGS 


If you want the computer to print the word 
TESTING, you have to put quote, or speech, 
marks around it, like this: 


PRINT "TESTING" 


This time when you press the RETURN key, the 
word TESTING wilt appear below the Line. 


Information held in this way between quote 
marks is called a most peculiar name _ in 
computer circles. The jargon for the 
information enclosed in the quote marks is 
'string'. So, in our example above, the word 
TESTING, when enclosed in quote marks, iS a 
String. (You can, in fact, get away with 
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just the first pair of quote marks so the 
Line reads PRINT "TESTING but this is not 
good practice.) 


OUR FIRST PROGRAM 


Type the following into your VZ300. Notices 
that each Line starts with a number. Type 
the number into the computer, and fotlow 
this with the other material: 


10 PRINT “JACK AND JILL" 


Now press RETURN. You have just entered the 
first Line of your first program. 


Type in the next Line, the one starting with 
20, and press RETURN once you have it’ in 


place. Do the same with the rest of the 
Lines: 


20 PRINT "WENT UP THE HILL" 
30 PRINT "TO FETCH A PAIL" 
40 PRINT "OF WATER" 


When you RUN this (by typing in RUN, = and 
then pressing the RETURN key), you’ should 
see the following: 


JACK AND JILL 
WENT UP THE HILL 
TO FETCH A PAIL 
OF WATER 


READY 
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ADDING NtW LINES 


The VZ300, clever beast that it is, allows 
you to enter your lines in any order you 
choose. It will then sort them into the 
correct order for you. 





Although our first program, and many of the 
other ones in this book are numbered in 
10's, starting at 10, there is no particular 
reason why you should fotlow this convention 
if you do not want to do so. 


However, there is a good reason for Leaving 
'gaps' in the counting. Although our first 
program could easily be numbered in 1's, it 
would leave no room to add tater Lines, if 
we decided there was a need to do so. 
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To see that the VZ does automatically put 
its Lines in order, add the following: 


25 REM A LINE IN THE MIDDLE 


Now type in LIST and press RETURN. The word 
LIST tells the VZ to List out the current 
program it is holding. When it does. So, 
you'll see Line 25 neatly in its numerical 
place. Now run the program again. You should 
find that Line 25 made no difference at all 
to it. | 


MAKING REMARKS 


Why did the VZ decide to ignore Line 25? The 
word REM stands for REMARK, and is used 
within programs when you want to include 
information for a human being who is Looking 
through the program Listing. 


You'll find REM statements scattered 
throughout the programs in this book. In 
each and every casSe, the computer ignores 
them. They are only there for your conven- 
ience, for the convenience of the programmer 
or for anyone else who wants to read through 
the program Listing. 


Often you'll use REM statements at the 
beginning of the program, such as_ the 
following: 


5 REM A JACK AND JILL POEM 
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You may wonder why this should be necessary. 
After all, it is pretty obvious that the 
computer is holding a 'Jack and Jill! poem, 
even without the Line 5 REM statement. You 
are right. In this case, there is Little 
point in adding a title REM statement to the 
Program. But have a Look at some of the 
more complicated programs a Little further 
on in this book. Without REM statements 
you'd have a pretty difficult time trying to 


work out what the program was supposed to 
do. 





It is worth getting into good programming 
habits early in your computer career, so I 
Suggest that, right now, you decide to use 
REM statements in alt your programs 


(assuming you have memory spare for them). 
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BACK TO PRINT 


Let's return to the subject of the PRINT 
command. Empty your VZ's memory by typing in 
the word NEW and press RETURN. Type the 
following program into the VZ300 and run it: 


10 PRINT 1,2 

20 PRINT 1:2:3 

30 PRINT "COMPUTER" 

40 PRINT "23+34 =":23+34 

50 PRINT 2*3 

60 PRINT 3°5 

70 PRINT "THE ANSWER IS":23+5-7/6 


The funny Little upside-down ‘'v' in Line 60, 
by the way, is on the keyboard as a Little 
arrow. You get it from the ‘N° key, by . 
holding down SHIFT while you press 'N!. 


When you run it, you'Ll see something Like 
this on the screen: 


1 2 
1 2 3 
COMPUTER 
23+34 = 57 
6 
243 
THE ANSWER IS 26.8333 


READY 


Firstly, as in the JACK AND JILL program, 
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the VZ executes a program tine by tLine, 
Starting at the Lowest numbered one and 
proceeding through the Line numbers in 
order, until it runs out of numbers, when it 
stops. Programs tend to run from the Lowest 
Line number up to the highest. 





You'Lt discover that this orderly prog- 
ression of tine numbers does not always 
apply, as there are ways of making the VZ 
execute parts of a program out of strict 
numerical order, but for the time being it 
is best to assume that the program will be 
executed in order. 
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Look first at Line 10 of the program. You 
Can see that there is a comma between the 1 
and the 2. This has the effect of making the 
computer print the numbers with a wide space 
between them. The comma can be used in this 
way to space numbers out neatly for a_ table 
of results or for similar purposes. (Try 
PRINT 1,,2 and see what effect this has.) 


When you use a comma in this way, to divide 
the things which follow a PRINT statement 
(but not when the comma is part of a string, 
that is, is between quote marks), you'Ll 
find it divides the screen up into neat 
LittLe columns. Try PRINT 1,2,3,4,5,6,7,8,9 
and see the result of the commas. Then you 
can try PRINT 1,,,,2,5,,;,;3,;,,,;4 to make it 
perfectly clear what iS going on. 


Line 20 has three numbers (1, 2 and 3) 
separated not by commas (as in Line 10) but 
by semicolons (;). Instead of separating the 
output of the numbers as the comma. did, 
you'LL see that it causes them to be printed 
with a single space on each side of them. 
When printed, numbers are always followed by 
aspace. Positive numbers are also preceded 
by a Space. 


Line 30 is a word, and this if a .... If 
you mentally said ‘string’ when you came to 
those dots, then you're Learning well. This 
word is a string, in computer terms, because 
it is enclosed within quote marks. 


Line 40 is rather interesting. For the first 
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time we have included numbers and a symbol 
(=) within a string. As you can see, the VZ 
prints exactly what is within the quote 
marks, but works out the result of the cal- 
culation for the material outside the 
quotes, giving - in this case —- the result 
of adding 23 to 24, 


Keep in mind that the VZ300 considers 
everything within quote marks as words, even 
if the material within the quotes is 
numbers, symbols, or even just spaces, or 
any combination of them, while it counts 
everything which is not within quotes in a 
PRINT statement as a number. 


This is why the VZ made a mistake earlier 
when we told it to print the word TESTING 
without putting the word in quotes. It 
Looked for a number which was called 
TESTING, and because it could not find one 
(as we had not previously told the computer 
to let TESTING equat some number), it was 
unable to cooperate. 


So line 40 treats the first part, with quote 
marks, aS a string, and the second part of 
the Line, outside the quote marks, as 
numerical information to process. 


In Line 50 we see the asterisk (*) used _ to 
represent multiplication, and the VZ300 
quite reasonably works out what 2 times 3 is 
and prints the answer of 6. In Line 60, we 
come across a new and strange sign, *~. This 
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means 'raise to the power', so Line 60 says 
print the result of 3 raised to the fifth 
power. In ordinary arithmetic, we indicate 
this by putting the 5 up in the air beside 
the three. However, it is pretty difficult 
for a computer to print a number halfway up 
the mast of another number, so we use the ~* 
symbol to remind us (by pointing upward) 
that it really means '‘'print the_ second 
number up in the air’. 


The final Line of this program combines a 
string ('THE ANSWER IS') with number inform- 
ation (23+5-7/6). You can see that, as 
expected, the computer works out the’ sum 
before printing the answer, and prints” the 
string exactly as it appears in the original 
program. Look closely at the end of the 
string. After the closing quote, there is a 
semicolon which, as we tearned in Line 20, 
joins various elements of a PRINT statement 
together. This semicolon means that’ the 
result of the calculation is printed up next 
to the end of the string. 


This brings us to the end of the_- second 
chapter of the book. I'm sure you'll be 
pleased at how much you've learned so far, 
and are looking forward to continuing your 
Learning. But, now you've earned a break. So 
take that break, and then come back to the 
book to tackle the third chapter. 
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It's all very well putting things onto’ the 
VZ's screen as we Learned to do in the Last 
chapter, but from time to time you'll 
discover we need to be able to get printed 
material off the screen during a program, to 
make way for more PRINT statements. We _ do 
this with a command called CLS, for CLear 
the Screen. 


CLEAR THAT SCREEN 


Enter the following program into your VZ300 
and run it: 


10 PRINT "TESTING" 
20 INPUT A$ 
30 CLS 


When you run the program, you'Ll see the 
word '‘TESTING' appear under RUN, more or 
less as you'd expect. However, below it 
you'll see a question mark. Where did that 
come from? The question mark is known as an 
input prompt. An input prompt, which appears 
in a program which the VZ comes to the word 
INPUT, means the computer is waiting for you 
to enter something else into it, or just to 
press RETURN. 


You'll recall those string things we talked 
about a while’ ago, and how they were 
anything which was enclosed within quote 
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marks. Well, in Line 20 above, the computer 
was waiting for a string input. We know this 
by the dollar sign which fotlows the A which 
follows the word INPUT. If there was no 
dollar sign, the VZ would want you to enter 
4 number. If there is a dollar sign, it 
wants a string, or for you just to press the 





RETURN key. It doesn't matter which one you 
enter. The VZ will be happy either way. 


When you come to an input prompt (remember, 
the question mark) and your computer is 
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expecting a string to be entered, you can 
either enter word, spaces, graphics charact-— 
ers, numbers, punctuation, or any combina- 
tion of them. Once you've typed in your 
words or whatever, you need to press RETURN 
so that the VZ will know you've finished 
entering your material. 


Anyway, when you respond to the input prompt 
just by pressing RETURN - rather than enter 
a word, and then press RETURN —- you'll see 
the screen clears and the word TESTING 
disappears. Where did it go? We pointed 
out that the VZ works through a program in 
Line order. Firstly the program printed 
TESTING on the screen with Line 10 and then 
progressed to Line 20, where it waited (for 
an input for for you to press RETURN). Once 
you had done this, the VZ moved atong to 
Line 30, where it found CLS and obeyed that 
instruction. The instruction was to clear 
the screen, so the VZ300 did just that, and 
the screen cleared. 


Run the program a few times, until you've 
got a pretty good idea of what is happening 
and you've mentally followed through the 
sequence of steps the VZ is carrying out. 


DOING IT AUTOMATICALLY 


Instead of waiting for you to press’ the 
RETURN key, you can write a program which 
clears the screen automatically, as our next 
tiny program demonstrates. Enter this 
program into your VZ, type in RUN and then 
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RETURN, and sit back for the Amazing 
Flashing Word demonstration. Note that, to 
make it easy to read what is in a program 
Line, you should put spaces between such 
words as FOR and TO. 


10 REM AUTO-CLEAR 

20 CLS 

30 PRINT @ 234, "AUTOTESTING" 
40 FOR D=1 TO 600 

50 NEXT D 

60 CLS 

70 FOR D=1 TO 600 

80 NEXT D 

90 GOTO 30 


Run this program, and you'tl see the’ word 
AUTOTESTING flashing off and on in the 
middle of the screen. 


What is happening here? 


We'LL look at the program, and go through it 
Line by Line. Firstly, as you know, Line 10 
is a REM statement which Labels the program, 
but which is ignored by the VZ300. Then, 
Line 20 clears the screen to get rid of the 
program Listing. 


Line 30 prints the word AUTOTESTING in the 
middle of the screen. Next, the VZ comes to 
Line 40, where it meets the word FOR. We'LL 
be Learning about FOR/NEXT Loops fas’ they 
are called} in detail in a later chapter, 
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but atk you need to know here is that the 
computer used FOR/NEXT Loops for counting. 
In this program, tines 40 and 50 (the FOR is 
in Line 40, the NEXT in Line 50) to tell the 
VZ to pause for a while and count from 1 to 
600 before moving on. AS you can see, it 
does this counting pretty quickly. 


So, it waits for a moment while counting 
from 1 to 600. Then, it comes to Line 60, 
which is the command CLS, which tells the VZ 
to clear the screen. The computer’ then 
encounters, in Lines 70 and 80, another FOR/ 
NEXT Loop, so waits a while as it counts 
from 1 to 600 again. 


Continuing on in the program, the VZ comes 
to Line 90 which tells it - as is fairly 
obvious - to go to tine 30, where the whole 
thing begins again. 


SEEING STARS 


The following program — STAR COLONY - also 
shows CLS in action, although it is much 
more interesting than the AUTOTESTING one. 


STAR COLONY is based on the very popular 
program LIFE, which was first developed by 
John Conway when he was attending Cambridge 
University in the UK. The program seeks to 
simulate the birth, growth and death of a 
colony of cells. AS we are using asterisks 
to indicate cells, and as these look vaguely 
Like stars, I decided to call this variation 
of the program STAR COLONY. 
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Conway drew up the rules under which the 
Stars in the colony evolve. You'LL be 
pleasantly surprised to see just how 
effective these rules can be when applied, 
producing unexpectedly delightful designs. 





The rules, which are applied by checking the 
Stars surrounding each position = on the 
screen, one by one. As a result of these 
Checks, decisions are made as to whether or 
not there will be a star in that position 
the next time the colony is reprinted. If 
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you imagine that a particular star _ is 
Sitting on a chess board, somewhere near the 
centre of the board, you'll see that it has 
eight squares surrounding it. If, when the 
contents of the eight surrounding squares 
are counted, two or three stars are found 
and there is a star on the square which is 
surrounded by the other eight, this star 
will survive until the next generation. 


If there are three stars surrounding the 
square being checked, and the central square 
is empty, a star will be 'born' in that 
square in the following generation. If 
there are four or more surrounding’ stars, 
then the central star will die before’ the 
next generation is printed. 


The rules are applied all over the screen at 
once, and once the full ‘galaxy’ has’ been 
assessed, the next galaxy generation is 
printed. 


Here is the program Listing: 


20 CLS:PRINT "PLEASE STAND BY" 
90 COLOR 2,1 
50 DIM A(12,12) 
60 DIM B(12,12) 
70 G1 
80 FOR X=2 TO 14 
90 FOR Y=2 TO 41 
110 IF RND(O)>.4 THEN A(X,Y)=1 
120 B[X,YJ=A[X,Y] 
130 NEXT Y 
140 NEXT X:CLS 
an 450 GOSUB 330 


160 
170 
180 
180 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 
380 
310 
320 
330 
340 
350 
390 
400 
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G=G+1 

FOR X=2 TO 14 

FOR Y=2 TO 11 

C=0 

IF A(X-17,Y-1)=1 THEN C-C+1 
IF A{X-1,Y}=1 THEN C=C+4 
IF A(X-1,Y+1)=1 THEN C=C+1 
IF A(X,Y-1)=1 THEN C=C+4 
IF A{X,Y+1)=1 THEN C=C+1 
IF A(X+1,Y-1}=1 THEN C=C+1 
IF A(X+1,Y}=1 THEN C=C+1 
IF A(X+1,¥+1)=1 THEN C=C+1 
IF A{X,Y}=1 AND C<>3 AND C<>e THEN B(X,Yj=0 
IF A{X,Y}=0 AND C=3 THEN B(X,Y)=1 
NEXT Y 

NEXT X 

GOTO 150 

PRINT @41,"GENERATION"G 
SOUND RND(25)},2 
PRINT:PRINT " ms 
FOR X=2 TO 141 

FOR Y=2 TO 14 


410 A(X,Y}=8(X,Y} 


420 
440 
450 
460 
470 


IF A(X,YJ=1 THEN PRINT "* "s ELSE PRINT " "= 
NEXT Y 

PRINTsPRINT “ ms 

NEXT X 

RETURN 
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And here are some 'colonies' produced by 
1G 


GENERATION 4 


* * * * * * * 
* % % = * & * 
* ® ¥ a & x 2 
* * * * * * * 
* * * * J * * * & 
a * * 
% 2 * * 

% * * * 

< * * * g % 

5 % * * * * * 

GENERATION 2 
* * * * * 
* e % x 
x 
* 

* x s 2 * 
* * ¥ * * 

* * 

* * * 
* * * ¥ 

* * % * 
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* * 
= * 
* 
* * 
* 
% & 


% % 
% * 
* 
* 
* * 
* 
% 


% % 
* * 
e 
% + 
* * 
& * 
% 
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CHANGING PROGRAM LINES EASILY 


It is relatively easy to change Lines within 
a typed program. ALL you have to do is use 
the 'M' and CTRL keys to move the cursor’ to 
the required position, then type in the 
desired changes. 


If you have a tine 10 which read... 


10 REM AN EDIT TEST 


»-.and you wanted it to read... 


10 REM AN EXCITING EDIT TEST 


»---ALl you would need to do would be to 
move the cursor to the Line, then use the 
INSERT key (the 'L' key, while holding down 
the CTRL key) to make space for the word 
EXCITING (nine spaces) before typing it in. 


After doing this, you just press the RETURN 
key again, and type in LIST (for use CTRL 5) 
and press RETURN again. This time, when the 
program is Listed, you'll see the new 
version of tine 10 is included within’ the 
program. 


If you only have a single letter wrong 
within a line, you simply move the cursor to 
the error, and then type in the correct 
Letter or Letters. These will automatically 
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replace the incorrect material. If you want 
to wipe out an enter Line, just enter’ the 
Line number, and press RETURN. 


Now these instructions may seem a tlLitttile 
complex. However, they do not need to be 
mastered before you can continues your 
Learning. 


If you're not sure how a particular Line 
should be edited, and you can't be bothered 
Looking it up here or in your manual, just 
type in the whole Line again. When you press 
RETURN, the new Line will automatically take 
the place of the old one within the Listing. 


GETTING THE PROGRAM BACK 


If you want to see a complete Listing after 
it has vanished, once a program has’ been 
run, all you need to do fas was’ mentioned 
briefly before) is type in the word LIST 
{or use CTRL 5) then press the RETURN key. 


There is no reason, when using LIST, why you 
must List the whole of a program from the 
beginning. When you have tonger programs, 
you may well want to List only part of them. 
You do this by use of the hyphen (-), as 
follows: 


LIST -100 This Lists up to, and 
including, Line 100 

LIST 50-90 This Lists Lines 56 to 
90 
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LIST 150- This Lists the program 
from Line 150 to the 
end 

LIST 270 This Lists just Line 
270 


USING THE PRINTER 


You connect your printer to the VZ via’ the 
PRINTER INTERFACE MODULE, which you plug in 
the back of the computer in the PERIPHERAL 
APERTURE. Make sure you disconnect your VZ 
from the power before plugging in the 
interface. 







PRINTER 
INTERFACE 
MOOULE 


PERIPHERAL 
APERTURE 


PRINTER 
PLUG 
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As well, the printer should be disconnected 
from the power. Once you've removed the 
cover marked ‘PERIPHERAL! from the back, 
plug the interface module in gently, but 
firmly. Once it is in place, turn on the VZ 
and make sure it is working as normal. If 
it is not, turn the power off, unplug’ the 
module, and start again, making sure you are 
as gentle as possible when sliding it into 
place. 


Once the computer end is OK, plug the other. 


end of the cable into your printer, and turn 
on the printer. 


To test it, just type in the word COPY and 
press RETURN. 


Here are the commands the printer 
recognizes: 
LLIST to List the current program 


COPY to print out what is currently 
on the screen 


LPRINT used within a program when you 
want to print something on the 


printer, rather than on the 
screen 


LLIST is very easy to remember, as it is 


37 


Programming the VZ300 


very similar to LIST, and has ae similar 
function, except that it Lists to the 
printer rather than Listing to the screen. 
In the same way, LPRINT is easy to remember, 
as it does more or Less what PRINT does, 
except on paper rather than on the TV. Note 
that LLIST can be used in the same way as 
LIST to get just parts of the Listing [so 
LLIST 40 - 70 is a valid command). 
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It's time now to start developing some real 
programs. You'LL notice that from this point 
on in the book there are some tLengthy 
listings. Many of them will contain words 
from the BASIC programming language’ which 
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have not been explained. This is because, as 
the programs become more complex (Cand _ (far 
more satisfying to run) it becomes more and 


more difficult to keep words - which Bh 
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not been explained - out of those programs. 
However, this is not a major problem, = and 
you'LL probably be able to work out what 
most of them mean, just from seeing them in 
the context of a program Line, 


We are working methodically through the 
commands available on your VZ3800, and in due 
course, all of the important ones will be 
covered. As we continue up the Learning 
curve, you'LL come across words in a program 
which seem unfamiliar. When you find = one 
Like this, just type it in. You'LlL find that 
you'Ll soon start picking up the meaning of 
words which have not been explained, just by 
seeing how they are used within the program. 
So, if you find a new word, don't worry. 


The program will work perfectly without you 
Knowing what the word is, and investigating 
the listing after you've seen the program 
running is likely to lead you to work = out 
what it means. 


RANDOM EVENTS 


In the world of nature, as opposed to the 
manufactured world of man, randomness 
appears to be at the heart of many’ events. 
The number of seagulls over the MCG at” any 
one time, the fact that it rained yesterday 
in Hobart and may well rain again today, the 
number of trees growing in_ the Snowy 
Mountains, all appear to be somewhat random. 


Of course, we can predict with some degree 
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of certainty whether or not it will rain, 
but the success of our predictions appears 
to be somewhat random as well. 


When you toss a coin in the air, whether it 
lands heads or tails depends on chance. The 
same holds true when you throw a six-sided 
die down on the table. Whether it tands with 
the one, the three or the six showing 
depends on random factors, 


Your VZ's ability to generate random number 
is very useful in order to get the computer 
to imitate the random events of the _ real 
world. The BASIC word RND Lies at the heart 
of using this means of generating random 
numbers. 


GENERATING RANDOM NUMBERS 


We'LL start by using RND just as it is to 
create some random’ numbers. Enter the 
following program, and run it for a while: 


40 REM RANDOM DEMO 
20 PRINT RNO(O); 
30 GOTO 20 


When you do this, you'Ll see a List of 
random numbers tike these appear on the 
screen: 


0985231 .535247 .0496182 .11153 .514353 .9877382 .254916 
e134856 .754681 9,96173E-03 .835601 .31631 .706701 .220855 
0155021 0774185 .390616 .552147 .173092 .53588 .699254 
2387718 .279562 .398306 .435725 .805982 .295596 .708233 


41 


Programming the VZ300 


As you can see, RND(O) creates numbers 
randomly between zero and one. It you Leave 
it running, it will go on and on apparently 
forever, writing up new random numbers’ on 
the screen. 


Now random numbers between zero and one are 
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of limited interest if we want to get’ the 
numbers to stand for something else. For 
example, if we could generate 1's and 2's 
randomly, we could call the 1's heads’7 and 
the 2's tails, and use the VZ as a kind of 
‘electronic coin'. If we could get it to 
produce whole numbers between one and six, 
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we could use the computer as an imitation 
six~sided die. 


Fortunately, there is away to do this. 
Enter the next program and run it: 


10 REM DICE 
20 PRINT RND(6}¢ 
30 GOTO 20 


When you run this program, you'll get a 
series of numbers, chosen at random between 
1 and 6, like these: 
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Even though we could create vast series of 
numbers between 1 and 6 with a program Like 
this, it is not particularly interesting. 
And, if you ran the program over and over 
again, you'd find that the sequence of 
numbers was starting to Look very familiar. 
The random numbers, as you'd discover if you 
ran the program a number of times, are not 
really random at all. 


This is because the VZ does not really 
generate random numbers, but only looks as 
if it is doing so. Inside its electronic 
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head, your VZ3800 holds a Long, tong List of 
numbers, which it prints in order when asked 
for random numbers. The List, fortunately 
for us, 1S so Long, that it iS more or Less 
impossible to see a pattern in it, once it 
7S running. 


FAST FOOD CRAZINESS 


We'LL look now at a program which makes” an 
interesting use of the VZ's ability to 
generate random numbers. As you can see, it 
creates a scene where you have turned up at 
a fast food outlet, unsure of what you are 
going to order. You decide you'LlL let your 
VZ's random number generator pick your food 
for you. 





Descent into Chaos 


Just type in this program, and see what 
you're having for Lunch: 


10 REM FAST FOOD 


20 CLS 

30 A=RND 
40 PRINT 
50 IF A= 
60 IF A= 


70 IF A= 


80 IF A= 


100 PRIN 
110 GOTO 


When you run 


(4) 


"YOU'VE GRDERED "s; 
1 THEN PRINT "A HAMBURGER" 
2 THEN PRINT “A THICKSHAKE" 
3 THEN PRINT "CHIPS" 
4 THEN PRINT "A HOT DOG" 
90 FOR D=%1 TO 600:NEXT D 


Tt 
30 


this, 


you'Lt get something Like 
the following on your screen: 


YOU'VE ORDERED A 


YOU'VE 


YOU'VE 


YOU'VE 


YOU'VE 


ORDERED 


ORDERED 


ORDERED 


A 


A 


A 


THICKSHAKE 


HOT DOG 


THICKSHAKE 


HAMBURGER 


ORDERED CHIPS 


When you Look back at the Listing, you'll 
see how the program sets the Letter A to the 
value of the random number in Line 30. In 
the Letter A is standing for a 


this case, 
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number. It is called a variable, or (because 
in this case it stands for a number) it’ is 
called a numeric. variable. In computer 
jargon, we say that in Line 30, the VZ has 
assigned the value of the random number to 
the variable A. 


And, as you can see in Lines 50, 60, 70 ant 
80, the value assigned to A determines which 
food order you place. 


Chapter Five — Looping the Loop 


In this chapter, I'LlL be introducing a very 
useful part of your programming vocabulary — 
FOR/NEXT Loops. You'll recall that we 





mentioned FOR/NEXT Loops when demonstrating 
the use of CLS to clear the screen. A FOR/ 
NEXT Loop was also used in our FAST FOOD 
program (Line 90) to add a detay. 


A FOR/NEXT toop is pretty simple. It takes 
the form of two Lines in the program, the 
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first of which is Like this: 


10 FOR A=1 TO 20 


With the second Line Like this: 


20 NEXT A 


The control variable, the letter after FOR 
and after NEXT, must be the same. (You can, in 
fact, Leave the second A out altogether, as 
the VZ3800 witl know what you mean. However, 
leaving the control variable out makes 
programs harder to read and alter, so this 
practice is not recommended in your early 
programming days.] 


As a FOR/NEXT Loop runs, the computer counts 
from the first number up to the second, as 
the next program shows: 


40 FOR A=41 TO 20 
20 PRINT A; 
30 NEXT A 


When you run it, you'LlL see the numbers 1 to 
20 appear on the screen, much as you~ may 
have expected. 


Now try this version: 


10 FOR A=765 TO 775 
20 PRINT A: 
30 NEXT A 


Looping the Loop 


This is the result of running it: 


765 766 767 768 769 770 7 
71 772 773 774 775 


STEPPING OUT 


In the two previous examples, the computer 
has counted up in ones, but there 78S no 
reason why it should always count in this 
way. The word STEP can be used after the FOR 
part of the first Line as follows: 


10 FOR A=10 TO 100 STEP 10 
20 PRINT As 
30 NEXT A 


When you run this program, you'Ll discover 
it counts (probably as you expected) in 
steps of 10, producing this result: 


10 20 30 40 50 60 70 80 
30 100 


STEPPING DOWN 


The STEP does not have to be positive. Your 
computer is just as happy counting 
backwards, using a negative STEP size: 
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100 TO 10 STEP -4Q9 


10 FOR A 


20 PRINT A; 
30 NEXT A 


hat the program output looks Like 


1S w 


This 


30 80 79 60 50 40 30 


100 


10 


20 


50 


Looping the Loop 
MAKING A NEST 


It is possible to place one or more FOR/NEXT 
Loops within each other. This is called 
nesting Loops. In the next program, the 8B 
Loop is nested within the A Loop: 


10 FOR A=1 TO 3 

20 FOR B=1 TO 2 

30 PRINT As"TIMES":Bs"IS";A*B 
40 NEXT B 

50 NEXT A 


The nested program produces this result: 


1 TIMES 1411S 14 
1 TIMES 21S 2 
2 TIMES 1418S 2 
2 TIMES 2 1S 4 
3 TIMES 1 1S 3 
3 TIMES 2 18 §& 


You need to be very careful to ensure that 
the first Loop which is started is the Last 
Loop which is finished. That is, if FOR A... 
was the first Loop you mentioned in_ the 
program, the Last NEXT must be NEXT A. 


Try swapping line 10 with Line 20 in the 
program, and see what happens when you get 
your FORs and your NEXTs mixed up. 
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You may recalt that I mentioned you do not, 
in fact, have to mention the _ control 
variable with the NEXT if you do not want 
it. I also said that it was not particularly 
good programming practice to Leave it out as 
it made programs somewhat difficult to 
unravel. However, as JI imagine you've 
realised by now, leaving off the control 
variables at least gets around the problem 
of wrongly specifying the NEXT in nested 
Loops. 


You can replace lines 40 and 50 of the 
program with either of the following 
(removing the old Line 50 completely): 

40 NEXT B:NEXT A 

40 NEXT:NEXT 


40 NEXT B,A 


MULTIPLICATION TABLES 


You can use nested loops to get the VZ to do 
such fascinating things as printing out’ the 
multiplication tables, from one times” one 
right up to twelve times twelve. Wow! Here's 
the program you need: 
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FOR A=1 TO 42 
FOR B=1 TO 12 
PRINT As"TIMES";B;"="sA*B 
NEXT Bz:NEXT A 


Here's part of the output of that program: 


7 TIMES 8 = 56 
7 TIMES § = 683 
7 TIMES 10 = 70 
7 TIMES 1% = 77 
7 TIMES 42 = 84 
8 TIMES 141 = 8 

8 TIMES 2@ = 16 
8 TIMES 3 = 24 
8 TIMES 4 = 32 
8 TIMES § = 40 
8 TIMES 6 = 48 
8 TIMES 7 = 56 


There is no reason why both Loops should be 
travelling in the same direction (that is, 
why both should be counting upwards) as this 
variation of the program demonstrates: 


10 
20 
30 
40 


FOR A=1 TO 12 

FOR B=12 TO 1 STEP -1 
PRINT As"TIMES"sBe"="2A*B 
NEXT BsNEXT A 
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Here's part of the output of that program: 


6 TIMES 7 = 42 
6 TIMES 6 = 36 
6 TIMES 5 = 30 
6 TIMES 4 = 24 
6 TIMES 3 = 18 
6 TIMES 2 = 12 
6 TIMES 41 = & 

7 TIMES 12 = 84 
7 TIMES 14 = 77 
7 TIMES 10 = 70 
7 TIMES 9 = 63 
7 TIMES 8 = 56 


BECOMING A MASTER-MIND 


It is time for our next real program. This 
is a computer version of Mastermind, in 
which your VZ thinks of a four-digit number, 
such as 5928, and you have eight guesses in 
which to work out what the number is. You 
not only have to work out the four’ numbers 
the computer has chosen, but also determine 
the order they are in. 


After each guess, the VZ300 will tell you 
how near you are to the finat solution. A 
'white’ is the right digit in the wrong 
position, and a 'black' is a correct digit 
in the right position within the four 
numbers of the code. AS you can See, you are 
aiming to get four blacks. Digits may occur 
more than one in the four numbers (so a code 
of 4426 or even 8888 is possible]. 
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Enter the program into your VZ300 and play a 
few rounds agsinst the computer. Then, 
return to the book for a discussion on it, 
which will highlight the role played by the 
FOR/NEXT Loops. 


Here is the Listing: 


10 REM MASTER MIND 

20 CLS 

30 PRINT OG 4, UFFEEEERESSESESSESERSESERESSSS SESE N 
40 PRINT "WHEN YOU ARE TOLD TO DO SO,","ENTER A 4-DIGIT NUMBER" 
50 PRINT “AND THEN PRESS <RETURN>," 

60 PRINTsPRINT "DIGITS CAN BE REPEATED" 

70 PRINTSPRINT “YOU'VE 8 GOES TO CRACK MY CODE" 
80 PRINT USSSKKSKSKKSESSSKSEKSSEVASSSASSASLE HN 

$0 FOR J=t TO 1000:NEXT J 

100 DIM B(4) ,D(4) 

110 H-O 

120 FOR A=4 TO 4 

130 B{A)=RND(9) 

140 NEXT A 

150 FOR R=1 TO 8 

160 PRINT:PRINT "THIS IS GUESS NUMBER"=R 

170 PRINT: INPUT "WHAT IS YOUR GUESS":G 

180 IF G<4?000 OR G>9999S THEN 170 

490 P=INT(G/1000} 

200 O=INT[ (G—1000*P)/100) 

210 T=INT( {G-—1000*P-100*0)/10) 

220 S=INT(G-—1000*P-—100*0—1 0*T } 

230 D(1)=P:D(2}=0:D(3)=T:D(4}=S 

240 FOR E=1 TO 4 

250 IF D(E)<>B(E) THEN 300 

260 PRINT " BLACK": 

270 B(E)=B(E}+10 
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280 
290 
300 
310 
320 
330 
340 
350 
360 
370 
380 
390 
400 
410 
420 
430 
440 
450 
460 
470 
480 
490 
500 
510 
520 
530 
540 
550 
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D(E}=D(E)+20 

Ha 

NEXT E 

IF H=4 THEN 540 
FOR F=1 To 4 

D=D(F) 

FOR X=1 TO 4 

IF D<>B{X) THEN 390 
PRINT " WHITE": 
B(X)=B(X)+10 

GOTO 400 

NEXT X 

NEXT F 

FOR X=1 TO 4 

IF B(X}<10 THEN 440 


8(X)=B(X)-10 

NEXT X 

H=0 = PRINT 

FOR D=i TO 1000:NEXT D 

PRINT "——————————-—": NEXT R 
PRINT:PRINT "YOU DIDN'T WORK IT OUT!" 


PRINT "THE CODE WAS":8(1):B(2);B(3) 3B(4) 
GOTO 530 

PRINT:PRINT "WELL DONE, MASTER MINDI" 
PRINT "YOU DID IT IN";Rs"GOES" 

PRINT: INPUT "ANOTHER GAME {Y OR Nj":A$ 
IF LEFT$(A$,1}="Y" THEN CLS:GOTO 110 
PRINT "OK BUDDY, THANKS FOR THE GAME" 


Looping the Loop 


Here's what the screen Looks like at the 
beginning of a run: 


SRECHSECAEESCSESHREEEREEEEEEHEREKREERE SE 


WHEN YOU ARE TOLD TO DO SO, 
ENTER A 4-DIGIT NUMBER 
AND THEN PRESS <RETURN>D, 


DIGITS CAN BE REPEATED 


YOU'VE 8 GOES TO CRACK MY CODE 
SSSR EEEEEEEEEEREEEEEEEE EE EE 


And here's part of one game in progress: 


BLACK BLACK 


THIS IS GUESS NUMBER 5 


WHAT IS YOUR GUESS? 6977 
BLACK BLACK BLACK 


THIS IS GUESS NUMBER 6 


WHAT IS YOUR GUESS? 6947 
BLACK BLACK BLACK BLACK 
WELL DONE, MASTER MIND! 
YOU DID IT IN 6 GOES 


ANOTHER GAME [(Y OR NJ}? N 
OK BUDDY, THANKS FOR THE GAME 


37 


Programming the VZ300 


We'LL now go through the program, line by 
Line, a practice we'll be fotlowing' in 
several of the programs in this book. If you 
don't want to read the detailed explanation 
now (and there may well be parts of it which 
are a little hard to understand at_ the 
moment), by all means skip over the expLlana- 
tion and then come back to it later when you 
have a bit more background knowledge to work 
with. | 


Lines 30 and 80 print a number of asterisks 
to rule of the title and instructions. Line 
S30 pauses for a few seconds so you can read 
this, and then the screen is cleared. 


Arrays are dimensioned in Line 100. We'Lt be 
discussing arrays in a Later chapter. For 
now, all you need to know is that by saying 
DIM B(4) you tell the computer you want’ to 
create a list of objects, with the list 
called B, in which the first item can be 
referred to as B(1), the second as B{2), and 
So on. You do not really need to dimension 
an array when there are 11 or Less items’ in 
your List, but it helps to keep- your 
thinking and programs clear if you do always 
dimension an array before using it in any 
program. 


In Mastermind, arrays are used for’ storing 
the number picked by the computer, and for 
storing the digits which you use each’ guess 
when you try to break the code. 


H is a numeric variable (we've met’ then 
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before) which is set equal to zero in Line 
110. In line 290, 1 is added to the value of 
H each time a black is found, so if Hever 
gets to equal 4, the computer knows all the 
digits have been guessed, and goes to the 
routine from Line 520 to print up the 
message about your victory. 


The Lines from 120 to 140 work out’ the 
number which you have to try and guess. Line 
110 uses the RND function we've discussed 
before to get four random numbers in_ the 
range 1 to 9, and stores one each in the 
elements of the B array. Note that’ the 
first FOR/NEXT Loop of our program appears 
here. The A in Line 120 equals 1 the first 
time the Loop is passed through, 2 the 
second time and so on, so that the A in 180 
changes as well. 


Our next FOR/NEXT Loop, which uses R, starts 
in the next Line. It counts from 1 to 8, to 
give you eight guesses. Line 170 accepts 
your guess, after the previous Line has told 
you which guess it is you are entering. 


The numeric variable G is set equal to your 
guess, and tine 90 checks to make sure you 
have not entered a five-digit number, or one 
which has Less than four digits. If you have 
done either of these things, the program 
goes back to line 170 to ask you once again 
to enter your guess, 


The next section of the program, = right 
through to line 450, works out how well 
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you've done, using a number of FOR/NEXT 
Loops (240 to 300, 38320 to 400, 340 to 390 
and 410 to 440). Line 470 sends the program 
back to the tine after the FOR R=... to go 
through the loop again. If the R Loop’ has 
been run through eight times, then the 
program does not go back to line 150, but 
'falls through’ Line 470 to 480 to tell you 
that you have not guessed the number’ in 
time, and to tell you what it is. Line 490 
prints out the four-digit code. 


If you do manage to guess it, so that 4H 
equals 4 in Line 310, then the program jumps 
to Line 510 to print out the congratulations 
message. 


Lines 530 to 560 provide the finishing 
touch. Line 530 asks you if you would tike 
to play again. If you do, then the computer 
goes back to 110 for another game. 


Even if you don't guess the four numbers in 
your eight goes, you're offered another go. 
By returning to line 110, rather than 
starting the whole program again, you don't 
have to read through the instructions again 
before playing the game. 
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Chapter Six — Changing in Mid-Stream 


I pointed out at the beginning of the book 
that, in most situations, your VZ300 follows 
through a program in Line order, starting at 
the Lowest Line number and following through 


in order until the program reaches the final 
line. 


This is not always true. The command GOTO 
allows you to break the orderly execution 
sequence, ON 





As you'll see from our next Program, you can 
use GOTO to send action through a program in 
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any order you choose. Enter thiS' program, 
and before you run it, see if you can 
predict what the result of running it will 
be: 


10 REM GO TO 

20 GOTO 50 

30 PRINT "THIS IS 30" 

40 GOTO 70 

50 PRINT "THIS IS 50" 

60 GOTO 30 

70 PRINT "THIS IS 70" 

80 FOR Z=1 TO 200:NEXT Z 
90 GOTO 50 


This rather pointless programs sends your 
poor VZ jumping all over the place, changing 
its position in the program every time it 
comes to a GOTO command. Here's what you'll 
See on your screen when you run it: 


THIS IS 50 
THIS IS 30 
THIS IS 70 
THIS IS 50 
THIS IS 30 
THIS IS 70 
THIS IS 50 
THIS IS 30 
THIS IS 70 
THIS IS 50 
THIS IS 36 


THIS IS 70 
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The program ignores the first Line, the REM 
statement, then comes to Line 20. Here it 
finds the command GOTO 50 and when it obeys 
it, it finds the instruction to print’ the 
message "THIS IS 50". It then continues on 
to line 60, where it is told to GOTO 30. 
Without question, it zips back to tine 30 to 
print out "THIS IS 30", then goes to Line 40 
which directs it to GOTO 70. At Line 70 it 
finds the instruction to print out "THIS IS 
70" which it obeys. There is a short delay 
(Line 80) then Line 90 tells the VZ to GOTO 
50 which it does, and the whole thing starts 
again. 


RESTRICTIVE PRACTICES 


Making use of GOTO in this way is catted 
unconditional branching. The command is not 
qualified in any way, so the VZ always obeys 
it. 


This brings us to the next computer words we 
will consider. These are a pair of words, 
IF and THEN, which are nearly always found 
together. They impose conditions on 
branching by GOTO commands. 


They are an easy pair of words to 
understand. IF something is true, THEN do 
something else. IF you are hungry, THEN 
order a hamburger. IF it is raining, THEN 
get an umbrella. IF you want a big car, THEN 
start saving. IF something, THEN something. 


The next program, which ‘rolls a die' (using 
63 


Programming the VZ300 
Lf Lf sr ay |e | (a i ; 
oy, yy, J a V4 f i, s 4 ER nae ICG Rs 
GLO CLG LO 
Gide 
Vis ee eh 
1/7 4 / 













OOO SO ate eee) 
e OOO OR 0,0 0.008 e. Ar era enge 


. 
er.".7.2 2 wees eB 
*.°,°.%, 08 ee ee! Gi a Oe eto", . 
CO ee ee on, | OR OL OY 
OOO a ray Ve tt es RO | A 
at Mk Cy 


LJ 
eee ee 
iJ 
peas OS oe 
oecore e®.*. 


oat ee 
oF 0% 0% 078, 
PW 


up the result of that die roll as a_ word, 
uses a number of IF/THEN Lines: 


40 REM DICE ROLL 
20 GOTO 140 

30 PRINT "ONE" 
40 GOTO 140 

50 PRINT "Two" 
60 GOTO 140 

70 PRINT "THREE" 
80 GOTO 140 

$0 PRINT "FOUR" 
100 GOTO 1406 


110 PRINT "FIVE" 
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120 GOTO 140 

430 PRINT "SIX" 

140 A=RND(6) 

450 FOR Z=1 TO 200:NEXT Z 
460 IF A=1 THEN 30 

470 IF A=2 THEN 50 

180 IF A=3 THEN 70 

490 IF A=4 THEN 90 

200 IF A=5 THEN 110 

210 IF A=6 THEN 130 


This is what you'LlL see when you run the 

program: 
SIX 
FOUR 
ONE 
SIX 
FOUR 
FIVE 
TwO 
SIX 
TwO 
Two 
ONE 
FIVE 


So, we've Looked at non-conditional and 
condition GOTO's to send action all over the 
place within a program. 


SUBROUTINES, ANOTHER WAY TO FLY 


There is another way to redirect the 
computer during the course of a e§$program. 
This is by the use of subroutines. A 


subroutine is part of a program which is 
called twice or more during the course of 
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running the main part of the program, and is 
more efficiently kept outside the main 
program than within it. 


The next program should make it clearer. In 
it, the computer throws a die over and over 





again. The first time it is thrown, the 
computer is throwing it for you. The second 
time, it throws the die for itself. 


After each pair of dice has been thrown, the 
VZ300 will announce who is the winner. The 
higher number wins. 


The program uses a subroutine to throw the 
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die, so we do not need two identical ‘'die- 
throwing routines! within a single program. 
Enter and run the program, then return to 
the book, and I'tl exptain where the 
subroutine is within the program, and how it 
works: 


40 REM DICE SUBROUTINES 

20 GOSUB 210 

30 PRINT:PRINT 

40 FOR R=1 TO 2 

50 GOSUB 150 

60 IF R=1 THEN A=D 

70 IF R=2 THEN B=D 

80 NEXT R 

90 PRINT TAB(5)s">> ": 

100 IF A>B THEN PRINT "Vz 300 WINS" 
410 IF A<B THEN PRINT “HUMAN WINS" 
420 IF A=B THEN PRINT "IT'S A DRAWI" 
430 SOUND 25,1:SOUND5,1:SOUND 25,1 
140 RUN 

450 REM DICE ROLL SUBROUTINE 

460 D=RND(6) 

470 PRINT TAB(4): 

180 IF R=1 THEN PRINT " I ROLLED A":D 
490 IF R=@ THEN PRINT "YOU ROLLED A":D 
200 RETURN 

210 REM DELAY SUBROUTINE 

200 FOR P=1 TO 400:NEXT P 

230 RETURN 
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This is what you'll see when you run it: 


I ROLLED A 3 
YOU ROLLED A 6 
>> HUMAN WINS 


I ROLLED A 1 
YOU ROLLED A 4 
>> HUMAN WINS 


I ROLLED A 5§ 
YOU ROLLED A 5 
>> IT'S A DRAW! 


The program pauses for a short while on Line 
220, returns to near the start of the 
program, prints two blank Lines, then enters 
the R FOR/NEXT Loop. When it gets to Line 
50, which it does once each time through the 
R loop, the program is sent to the sub- 
routine starting at Line 150. 


Here, the ‘die is rolled' in line 160, and 
the numeric variable D is set equal to’ the 
result of the roll, using an IF/THEN to 
determine whether the computer should print 
out either "I ROLLED A..." or "YOU ROLLED 
A...". Then the VZ300 comes to the _ word 
RETURN in Line 200. The word RETURN signals 
to the computer that it must return to the 
Line after the one which sent it to the 
subroutine. 
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In this program, Line 50 sent it to the sub- 
routine, so it returns to Line 60. 


There, the IF/THENs in Lines 60 and “70 
determine whether the value of the roll 
(variable D has been set equal to this 
vaLue} should be assigned to variable Aor 
to variable 8. 


Line 80 ends the FOR/NEXT Loop, and_ then 
Lines 1700 through to 120 determine whether 
the VZ has won (which it will have done if A 
is greater than B, a condition which is 
tested using the > sign in Line 100), oor 
whether the human has won (which happens if 
A is tess than B, a condition tested in Line 
110 with the < symbol). 


From here, the program RUNS again from the 
beginning. Remember, to stop the VZ300 
running an ‘tendless!' program of this” type, 
you hold down the CTRL key, and press BREAK 
until the program halts. 


Study this Last program, until you're pretty 
sure you know how subroutines work. 
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The SOUND command is a great way to add Life 
to your programs. It is amazing, as you'll 
soon discover, what a small amount of sound 
can do to enhance a program. 


= 


\ fooy iC 
“ 





SOUND is always followed by two numbers {or 
by variables representing numbers). The 
first number is the pitch, or frequency, of 
the note to be played, and the second 
determines for how long the note will sound. 
The pitch is a number between 0 and 31, #=and 
the duration is a number between 1 and 9. 
The pitch value of O produces no sound. It 
can be used as a 'rest', in music terms. 
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Here's a simple program which puts the SOUND 
statement through a few of itsS paces: 


10 REM SOUND DEMO 

20 FOR S=0 TO 31 STEP 2 
30 SOUND S,1 

40 NEXT S 


And you can combine more than one SOUND 


Statement at atime within a loop for. an 
even more effective result. ALL you need to 


do is add ae single line - 385 - to the 
program above for an incredible change in 
the effect it produces: 


35 SOUND 31-S,1 


THE PHANTOM COMPOSER 


The VZ3800 can even write itS own music - 
after a fashion. Enter and run the following 
program and you'LtL hear the magic’ for 
yourself: 


S REM PHANTOM COMPOSER 
10 S=RND(31)} 

20 D=RND(2) 

25 FOR J=1 TO RND[3) 
27 NEXT J 

30 FOR J=1 TO RND(3) 
40 SOUND S,D 
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50 IF RND(O)>.7 THEN SOUND 31-S,D 
60 NEXT J 
70 GOTO 10 


The Phantom Composer, as it pretty obvious 
from the program, choses notes and durations 
at random, and plays them. From time to 
time, it will repeat a phrase two or three 
times (using the Loop from 30 through to 60) 
and sometimes add in an extra note during 
the repeat (line 50). 


To become your own Phantom Composer, -= and 
write music on the VZ3800, you need to' know 
the exact musical equivalents of the note 
and duration numbers. 


FREQUENCY 


Here are the frequencies for the VZ300. The 
first number is the number you use [as_ the 
first one after the SOUND command), and the 
second is its actual musical value: 


0 - REST 1 - Ae 
2 — A#e 3 - Be 
4 - C3 5 — C#3 
6 - D3 7 — D#3 
8B - ES 9 - FS 
10 - F#3 11 - G8 
12 - G#3 13 - A3 
14 - A#3 15 ~- B3 
16 - C4 17 -— C#4 
18 - D4 19 — D#4 
eO —- E4 21 —- F4 
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22 —- F#H4 e3 ~- G4 

24 — G#4 eo — A4 

26 — A#4 27 — B4 

eB —- C5 29 — C#S 

30 - DS 31 —- D#5 
DURATION 


Now, here are the relevant note Lengths. The 
first number is the one you have after’ the 
comma in the SOUND command, and the~ second 
number is its value, taking a gquaver to have 
a value of 1: 


Number Durzation 


1/8 
1/74 
3/8 
1/2 
3/4 

1 

1 1/74 
2 

3 


oConoaa non = 


SOUND ADVICE 


The control numbers for the SOUND command, 
as Listed above, can be the result of 
calculations, instead of being numbers’ or 
assigned variables. In the next program, 
SOUND ADVICE, you have to guess the number 
between 1 and 50 which the VZ has’”~ thought 
of. The feedback on each guess —- which will 
help you home in on the correct number in 
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the shortest number of guesses ~ iS in the 
form of output produced by SOUND. 


The tower the note, the closer you are to 
the correct answer. Once you've played the 
game a few times, you'll be pleased to see 
how skilled you become at interpreting the 
output. 


Here's what you see on the screen when 
playing the game: 


THIS 1S GUESS 5 
WHAT NUMBER AM I THINKING OF? 10 


NO, 10 IS WRONG 


THIS TS GUESS 6 
WHAT NUMBER AM I THINKING OF? 4 
NO, 4 IS WRONG 


THIS IS GUESS 7 
WHAT NUMBER AM I THINKING OF? 7 


YES! I WAS THINKING OF 7 
You GOT IT IN 7 TRIES 


And here's the Listing. Note that ABS in 
Line 100 stands for ‘absolute' and gives the 
result of the calculation, stripped of its 
sign. That means, if the result of a 
calculation is a negative number, say -/7, 
the ABS of that number is 7, so ABS(-7)=7. 
The ABS of a positive number is just the 
number, unchanged. | 
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10 REM SOUND ADVICE 

20 CLS 

30 N=RND(50) 

40 R=1 

50 PRINTsPRINT “THIS IS GUESS":R 

60 INPUT "WHAT NUMBER AM I THINKING OF":GUESS 
70 IF GUESS<1 OR GUESS>50 THEN 60 

80 IF GUESS=N THEN 120 

90 PRINT "NO,"sGUESS:"IS WRONG" 

100 S=ABS{N-—GUESS}:SOUND S,2 

110 R=R+1:FOR O=1 TO 400:NEXT D:GOTO 50 
120 PRINTsPRINT "YES! I WAS THINKING OF"=N 
130 SOUND 31,7:SOUND 1,2:SOUND 31,1 

140 PRINT "YOU GOT IT IN":R:"TRIES" 


The first Line of the program is, of course, 
just a REM statement to tell you the name of 
the program. The next Line clears’ the 
screen, and Line 930 sets the variable N 
equal to a number chosen at random between 1 
and 50. This is the number which you have to 
try and guess. 


The variable R is set equal to 1 in Line 40. 
As you've probably realised, this is used to 
count the number of guesses you have made. 


Line 50 prints up the number of the current 
guess and tine 60 asks you to enter a 
number. The following Line checks the size 
of your guess, rejecting it if it is above 
50 or below 1. 


Note that Line 70 ends with THEN 60, rather 
than THEN GOTO 60, as you may have expected. 
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You are allowed to Leave out the word GOTO 
after THEN, as the VZ will understand what 
you mean. If, however, you feel that the 
program will be easier to understand with 
the word GOTO in place, by all means replace 
it, and do the same in the following Line. 


Line 80 checks your answer, and if it finds 
that your guess is the same as the number 
the computer has thought of, it sends action 
to Line 120 where the congratulations 
message is printed. 


BUT WHAT IF YOU'RE WRONG? 


If you're not right, the program goes on to 
Line 90 where the message "NO, x IS WRONG" 
is displayed. Now we come to the interesting 
bit. The variable S is set equal to _ the 
absolute difference between the computer's 
number and your guess. The sound is produced 
at the end of Line 100, 1 is added to the 
value of the variable R in the next Line, 
and then after a pause the program returns 
to 50 for your next guess. 


Loch MacDicksamith 


This beautiful Lake in northern Scotland is 
unknown to most tourists. Instead of a 
monster, Loch MacDicksmith has its very own 
piper, who Plays on that traditional 
scottish instrument, the VZ-bagpipes. If 
you want to hear the wonderful sounds’ the 
Piper creates, run the next program: 
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10 REM VZ BAGPIPES 

20 DIM N(10) 

30 FOR S74 TO 10 

40 READ N(S) 

50 NEXT S 

60 M=RND(10) sD=RND(5) 

70 SOUND N(M),D 

80 FOR J=1 TO RND(2)=sNEXT J 

90 GOTO 60 

100 DATA 4,6,8,9,11,13,15,16,16,4 


MAKING YOUR OWN MUSIC 


If the '‘auto-bagpipes' are too much for you, 
try the next program, which allows you to 
use the bottom row of keys as a kind of 
organ. It is not too musical, but you should 
have some fun with it: 


40 REM VZ 300 ORGAN 

20 CLS 

30 C$=INKEYS 

40 IF C$="" THEN 30 

50 IF C$="Z" THEN SOUND 4,2 
60 IF C$="X" THEN SOUND 6,2 
70 IF C$="C" THEN SOUND 8,2 
80 IF C$="V" THEN SOUND 9,2 
90 IF C$="B" THEN SOUND 11,2 
410 IF C$="N" THEN SOUND 13,2 
120 IF C$="M" THEN SOUND 15,2 
430 IF C$="," THEN SOUND 16,2 
140 IF C$="." THEN SOUND 18,1 
450 IF C$=" " THEN END:REM SPACE 
160 IF INKEY$<>"" THEN 160 
170 GOTO 30 
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To play the organ, just touch the keys on 
the bottom row of the keyboard, as follows: 


Press this To get this 


Rey: note: 
Z C 
X D 
C E 
V F 
B G 
N A 
M B 
, Cc! 
‘ D! 


Press the space bar to end the music. 
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It's time now to take s break from the 
serious business of Learning to program. As 
you can see in this chapter, we have’ two 
major programs which use many commands which 
have not yet been explained. I Suggest you 
enter the programs just as they are and play 
them for your own enjoyment, and forget 
about Learning for a while. 


I don't think it's fair to keep you waiting 
for major programs until you've covered 
everything on the VZ3800. Also, entering 
short demonstration programs can get pretty 


boring if you're tonging to see your 
computer really in action. Therefore, I hope 
you'LL enter the programs ‘on trust', 


returning to this chapter for the explana- 
tions when you're ready. Of course, you 
don't have to enter the programs right now. 
If you'd prefer to continue with the 
Learning, then just go on to chapter nine. 


OUT ON THE FAIRWAY 


In the first game, you and your versatile VZ 
have to tackle the Dicksmith Golfcourse. 


You have nine holes to negotiate, and as 
you' LL see when you play the game, the VZ 
oblLigingly keeps the score card for you. 
After each hole, it will tell you how well 
you're doing to date, and then will work out 
the average score per hole. Atl you have to 
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do is hit the ball. If you overshoot, the VZ 
will automatically ensure that the next shot 
is back towards the hole. 


Here's what the program looks Like in 
action: 


SCORE UP TO THIS HOLE IS 6 
<< HOLE NUMBER 2 >> 
DIFFICULTY FACTOR IS THREE 


0 
FEELERS ESESESELEAEEELEN /EEETEE 
FEEFEFEELEFETTEL ETE EETE FETE TT 


AARARAAARARAARAARAARARRAARAARRKREAARA 


ENTER STROKE STRENGTH? 12 


SCORE UP TO THIS HOLE IS 14 
<< HOLE NUMBER 3 >> 
DIFFICULTY FACTOR IS FIVE 


FFEFEEEFERLELERESESEEIN /PEFETE 
FEFEFFEFELE FEL EFSF EL EF EOL EEE ETE 


MAARAHEARALKAARAKRRAAARARAHRAKARRARARAREAREAA 


ENTER STROKE STRENGTH? 2 
You DID IT! 


THE GAME SO FAR: 

HOLE 1 TOOK 6 STROKES 

HOLE 2 TOOK 8 STROKES 

HOLE 3 TOOK § STROKES 

THE AVERAGE SO FAR IS 7 

SCORE FOR 3 HOLES IS 23 
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You'Ll probably find it pretty tricky going, 
especially on holes with a high difficulty 


factor. 


Here's the Listing, golf pro: 


10 


REM GOLF 


20 DIM X(9}:C=0:H$=CHRS$( 48) 


30 
35 
40 
45 
00 
60 


70 


80 
So 


U=224 

L$=" "sREM 32 SPACES 
FOR 2Z=1 T0 9 

CLS 

SC=0 

J=RND (12) 

Q=RND(3)+2 

IF Q=5 THEN Q$="FIVE" 

IF Q=4 THEN Q$="FOUR" 


100 IF Q=3 THEN Q$="THREE" 
110 PRINT @448,L$:PRINT @64, 


115 
120 


IF Z=1 THEN PRINT 
IF Z>1 THEN PRINT “SCORE UP TO THIS HOLE IS"; 


430 IF Z=2 THEN PRINT X(1) 


135 


IF Z>2 THEN PRINT K 


440 PRINT "<< HOLE NUMBER"sZ;">>" 
450 PRINT "DIFFICULTY FACTOR IS ":0$ 


160 
170 
175 


GOSUB 430 
PRINT 
INPUT "ENTER STROKE STRENGTH":A 


177 
186 
185 
200 
205 
206 
207 
210 


SOUND 31,1 

PRINT @U,L$ 

IF J>24 THEN A=-A 
J=J+INT(A/RND(Q) ) 

IF J=24 THEN GOSUB 490 
IF J>30 THEN J=30 

IF J<1 THEN J=1 


IF J<>24 THEN PRINT @U+J~-1,HS af 
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215 
220 
230 
240 
250 
260 


IF J<>24 THEN PRINT@352,L$:PRINT L$ 
SC=SC+4 

PRINT @448,"YOUR SCORE IS NOwW":SC 
FOR P=4 TO 700:NEXT P 

IF J<>24 THEN 110 

C=C+SC 


270 X(Z)}=SC 


280 
290 
300 
310 
320 
330 
340 
350 
360 
365 
370 
380 
385 
386 
390 
400 
410 
420 
430 
435 
446 
450 
460 
470 
480 
4380 
500 
510 


IF Z=1 THEN 390 

K=0 

PRINT "THE GAME SO FAR:" 

FOR J=1 TO Z 

K=K+X{J] 

PRINT "HOLE" J"TOOK"X(J) "STROKES" 

FOR M=1 TO 300:NEXT M 

NEXT J 

IF Z=9 THEN 370 

PRINT “THE AVERAGE SO FAR IS"INT[(K+.5)/Z) 
FOR P=1 TO 1000:NEXT P 

IF Z>1 THEN 390 

PRINT "FIRST HOLE SCORE:"C 

GOTO 400 

PRINT "SCORE FOR"Z"HOLES IS"C 

FOR M=1 TO 2500:NEXT M 

NEXT Z 

GOTO 560 

IF J>30 THEN J=30 

PRINT @196,"'" 

PRINT TAB[U-1) sHS 

PRINT "S##S#E0E80E8 8088 8048484\ /448848" 
PRINT "##8F88EE800 880480888888 E4EEREE" 
PRINT UAsacasaaannanaaaaannnanancnnanalt 
RETURN 

PRINT@416,"YOU DID ITI" 

PRINT@3141 ,H$ 

FOR P=4 TO 300:NEXT P 
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S20 SOUND 21,4:SOUND 16,2 

S25 SOUND 16,47:SOUND 18,4 

S27 SOUND 16,4:SOUND 6,1 

530 SOUND 20,4:SOUND 21,4 

540 FOR P=1 TO 2000:NEXT P 

550 RETURN 

560 PRINT “END OF THAT ROUND!" 

570 PRINT | 

575 PRINT "YOU SCORED"C 

580 PRINT "& YOUR AVERAGE WAS" INT{ (C+.5)/9) 
580 PRINTsPRINT 

600 PRINT “ENTER 'Y* FOR A NEW ROUND," 
605 PRINT " OR 'N' TO QUIT" 

610 A$S=INKEY$ 

620 IF A&S<>"Y" AND A$<>"N" THEN 610 
630 IF A$="Y" THEN RUN 

640 PRINT 

650 PRINT “OK, SEE YOU AGAIN SOON" 


TESTING YOUR SPEED 


The second program in this chapter, REACTION 
TESTER, is great fun to play. You enter the 
program, RUN it, and the message "STAND BY" 
appears. After an agonizing wait, the words 
will vanish, to be replaced by the _ words 
"OK, HIT THE 'Z' KEY", 


As fast as you can, you have to teap for the 
'Z' and press it, knowing that the VZ300 is 
keeping count of your actions all the time. 


The computer will then tell you how quickly 
you reacted, and then compare this with your 
previous best time. "THE BEST SO FAR IS..." 
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appears on the screen, and the VZ then waits 
for you to take your hands off the keyboard 





to prevent cheating Cas if you'd do such a 
thing!) before the whole process’ starts 
again. 


YOUR SCORE IS 22.0224 
OK, HIT THE 'Z' KEY! 
THE BEST SO FAR IS 13.9986 


A Y 
BA STAND B 


The game 


A Game and a Test 


continues until you manage to get 


your reaction time down below 4, which is 
not at all easy to do. 


Here's the Listing of REACTION TEST: 


S REM REACTION TESTER 
7 CLS 


10 
15 
16 
17 
19 
20 
25 
27 
30 
35 


aS 


o0 
52 
55 
60 
65 
67 
70 
75 
77 
78 
80 
85 
30 
95 
97 


HS=1000 

FOR W=1 TO 3000 

COLOR 3,1 

IF HS<4 THEN 95 

CLS 

PRINT @236,"STAND BY" 

GOSUB 105 

COLOR 2,0 

GOSUB 100 

IF A$<>"" THEN 25 

C=0 

COLOR 1,1 

PRINT @134,"0K, HIT THE 'Z' KEYI" 
C=C+1 .07+RND (0) 

PRINT @1,C;" " 

GOSUB 100:IF C>=200 THEN 90 
IF A$<>"Z" THEN 50 

PRINT 

PRINT "YOUR SCORE IS":C 

IF C<HS THEN HS=C:SOUND 30,2 
PRINT:PRINT:PRINT 

PRINT "THE BEST SO FAR IS"sHS 
GOSUB 105 

GOSUB 100 

IF A$<>"" THEN 80 

NEXT W 

PRINT 


PRINT "YOU'RE THE CHAMP!" 
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98 SOUND 31,5:SOUND 28,5:SOUND 1,2:SOUND 31,5 
9S SOUND 7,7:SOUND 3,1:END 

100 A$S=INKEY$:RETURN 

105 FOR P=1 TO 500+RND(SS89) 

110 NEXT P 

115 CLS:RETURN 


OK, that's enough fun. Time to get back to 
the hard stog in chapter nine. 


86 


Chapter Nine — Stringing Along 


You'Lt recall that several times in this 
boak so far we've referred to numeric 
variables (which can be Letters such as A or 
B, words like CN or GS, or combinations of 
letters and numbers such as Ré2 or D2). We've 
also talked about string variables (a letter 
followed by a dollar sign, such as A$ or G§ 
is a string variable). In this chapter, 
we'LlL be looking at strings, and at’ things 
you can do with them. 


THE CHARACTER SET 


Every letter, number or symbol the computer 
Prints has a code number. Telling the 
computer to print the character of that code 
produces the character. The codes are known 
a ASCII (pronounced ‘ass~key') codes, which 
is an almost universal Cin the world of 
computers) code for Letters, numbers” and 
symbols, in which a number between O and 255 
is assigned to each of them. The number 65, 
for example, always stands for ‘A'. 


Now, the ASCII code of 'A' is 65. You know 
this, because I just told you. If I hadn't 
told you, how would you have found out? 


The computer word to find out a code is ASC. 
Try it now. Enter the following into your 
VZ300, and see what you get: 


PRINT ASC("A") 
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that the Letter for which you want the 
be within brackets, and quote 
When you enter that Line on 


Note 
code must 
marks as above. 


4 -= 
ITLL ELEETE ie rae 3 : G JIN 
1 pa ee ev any 
Pathe = >~ eA? 4 
= Ca * A 
feline 


SOOT 6 at aa 


, 
%, : 
a . 
a 4 


Roan 
twat Wat mice 

a4 hh 

See _— 


$2 


at 

4 

7 WS 
et 


“eo 
“4 
- 4 
7 Oa Wrssy " : 
nA rere PSS i ane 
WE Hm b tena ee % car at. = 
EAL ew Tabet rhe Se a Z-=git F vente 
>t POSES On aa ae EL 
ve a-5 =~ *% biitetel toe wpb eee eptitiaN "Le MZ, Ma) 699)/ BN LAr * 
a mn Te &) Y se Te SD. eal: OAs el eo’ Seif (a feet oe am ies av’. Wz, 
ae, E “. ~ aa Fj. at WS ue # £4 seit ‘. fey! us f’. ae . a9 
. me ed ma he PSII its % 4 : a Tae Wee 1€ WS gy 
RYE EG PTE SSL CD (LF ANE HIT 1d tin 
BAY ae PLE EE rap Os SS) NUNS as 
SoS MMU ts ae eg S28 nee 
e Sees Sew ety a ey ee a 
r i aa d - "i ' =s ; 
if SANA jae at MOT er, ie 


= B ~ 
WAG A 4 ‘ 5 
ODT bet -‘ a3 : . a iS x fi aia in 
y " hie: g : A , C4 age . 
iy Ce ed AT LL et ranihhhrn A 
WA IA . : 6 ales ye. Ds ner / oes <Q: 
fad 


OS AIK SS ah, 3 Wi ESS (ES, SS 
Baa LEE a QR NR ee 
and press RETURN, you should get an 
(The ASC value of the’ Letter 


to do with the value 


assigned to A when it is a numeric variable. 
If it is in quote marks, it is a Letter, the 
Letter "A", If it is not in quote marks, it 


is a numeric variable, A.) 


yn l\S SS = 
NEN SS! 


) 
Ny 
Ay 





your VZ, 
answer of 65. 
nA" has nothing 


From the short demonstration Line above we 
confirmed that 65 was indeed the ASC of "A". 
We can turn a65 into the Letter "A" by 
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asking the computer to print the character 
which corresponds to ASC code 65. We do this 
with the word CHR$, as follows: 


PRINT CHRS$(65) 


When you enter this into the old VZ, and 
press RETURN, the Letter "A" will appear on 
the screen. 


You can print out every ASC code and =its 
character with the next short program. Enter 
it, and watch closely when you run it: 


40 REM CHARACTERS 

20 FOR J=32 TO 255 

30 PRINT J;CHRS(J);" —"; 
40 FOR D=1 TO 100:NEXT D 
50 NEXT J 


This is the start of what you'LlL see printed 
out on the screen: 


32 33 | 34 " 35 # 
36 $ 37 &% 38 & 3g ! 
40 [ Ai j 42 * 43 + 
44, 45 - 46. 47 / 
48 0 49 1 50 2 51 3 
se 4 o3 5 34 6 55 7 
S6 8 57 3 58 5: 5S 5 
60 < 61 = 62 > 63 ? 
64 @ 65 A 66 B 67 C 
68 D 69 E 70 F 71 G 
72H 73 I 74 J 75 K 89 
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76 L 77 M 78 +N 79 O 

80 P 81 0 B2 R 83 S 

84 T 85 U 86 V 87 W 

88 X 89 Y 90 Zz 91 [ 

se\ 93] 94° 95 _ 

96 97 | 98 " 99 # 
TESTING YOUR CHARACTER 
Our next program is a reaction tester, a 
little like the one we played with in the 
preceding chapter. However, in this’ one 
you're not just being tested on speed. In 
this program you have to try and find the 
right key as quickly as possible. 
A tetter will appear on the screen. As 
quickly as you can, find that Letter on the 
keyboard and press it. You'll be told how 
long it took you, and this time will be 
compared to your best time. 
Notice how the Letter which is printed = on 
the screen uses CHR$ in Line 25, where it 
prints the character of a number chosen. at 
random by Line 15 and assigned there to 


variable A. 
reads the 
without you 


A$ is set equal to INKEY$ (which 
current Key you're touching, 
having to press the RETURN’ key) 


in Line 35 and compared with the Letter your 


VZ has chosen, 


in Line 40. 


5 REM CHARACTER TEST 
6 BEST=200 

7 CLS 

8 GOSUB 95 


15 
16 
17 
20 
25 


35 
40 
45 
50 
60 


65 
67 


70 


72 
75 
80 
85 
90 
92 
93 
95 


Stringing Along 


A=65+AND (26) 

IF A=B THEN 15 

B=A 

S=0 

PRINT @423,CHR$([A} 
AS=INKEY$ 

IF A$=CHR$(A) THEN 70 
S=S+1 

PRINT €293,S 

IF S<200 THEN 35 

PRINT "SORRY - TIME IS UP" 
GOTO 80 

SOUND 30,3 

PRINT "WELL DONE, YOU SCORED" 
PRINT " "sS"ON THAT ONE!" 
IF S<BEST THEN BEST=S 
PRINT PRINT 

PRINT "BEST SCORE SO FAR": 
PRINT " IS":BEST 

IF BEST=3 THEN END 

FOR P=1 TO 19*S:NEXT P 


100 CLS:SOUND 4,4:SOUND 20,3:SOUND 4,2 
105 GOTO 15 


CUTTING THEM 


UP 


One of the very useful aspects of the BASIC 
used on the VZ300 is the way in which it can 
be used to manipulate strings. 


The words used to handle strings are: 


LEFTS$ 
MID$ 


RIGHTS$ 
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These are usually spoken atoud as ‘'Left- 
string', 'mid-string' and ‘right-string'. 


Our next program shows them in action. Enter 
it and run it on the VZ, then return to the 
book for a brief discussion to see what can 
be Learned from it. 


5 REM STRINGS 

7 CLS 

10 A$="THE*ELECTRIC*DICK" 

45 PRINT "LEFTS(A$,3}="sLEFT$(A$,3):GOSUB 55 
20 PRINT "LEFT$(A$,5)=":LEFT${A$,5):GOSUB 55 
25 PRINT "RIGHTS(A$,3)="sRIGHT$(A$,3]:GOSUB 55 
30 PRINT "RIGHT$(A$,5)="sRIGHT$(A$,5) sGOSUB 55 
35 PRINT "MID$({A$,3J]="sMID$(A$,3):GOSUB 55 

40 PRINT "MID${A$,5)=""sMID$(A$,5):GOSUB 55 

45 PRINT "MID${A$,5,4)="sMID$(A$,5,4}:GOSUB 55 
50 PRINT "MIDS(A$,2,7)="sMID$(A$,2,7)sGOSUB 55 
52 END 

55 FOR J=1 TO 300:NEXT J:RETURN 


Look at the output. 


LEFT$(A$,3)=THE 
LEFTS$(A$,5)=THE*E 
RIGHTS(A$,3}]=ICK 
RIGHT$(A$,5)=*DICK 
MID$(A$,3)=E*ELECTRIC*DICK 
MID$(A$,5)=ELECTRIC*DICK 
MID${A$,5,4}=ELEC 
MID${A$,2,7)=HE*ELEC 
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AS you can see, the program first, in Line 
10, sets the string variable A$ equal to the 
String "“"THE*ELECTRIC*DICK", Then it uses 
LEFT$, RIGHTS and MID$ to extract portions 
of that string. 





Look at the first Line of the output. 
LEFTS$(CA$,3)=THE. LEFT$ takes the Leftmost 
portion of the string, as far as the number 
which follows the string. That is, when we 
have LEFT$(A$,3) it takes the three leftmost 
characters of the string. The next printout, 
LEFTS(A$,5) takes the five Leftmost 
characters of the string, Producing in this 
case THE*E (because they are five Leftmost 
characters of the overall string). 
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It can be used slightly differently. If we 
Said... 


PRINT LEFT$("THE*ELECTRIC*DICK",3) 


»~-.the VZ would 
print out THE just the same as it did in the 
program. The string, then, can either be a 
String variable (A$) or the string in full 
("THE*ELECTRIC*DICK"). 


As you've probably worked out by now, RIGHTS 
does the same thing as LEFT$, except it 
Starts at the righthand end of the string. 
Therefore, RIGHT$(A$,3) selects the three 
rightmost characters of the string, in this 
case, ICK. Again, as above, this is the same 
as saying: 


PRINT RIGHTS ("THE*ELECTRIC*DICK", 4) 


MIDS is a Little more flexible. It selects a 
portion from the middle of the _ string, 
starting from the character number’ which 
follows the string. Therefore, MIDS(A$,4) 
prints atl the string starting with the 
fourth character. 


If there is only one number, such as the 4 
above, then MID$ selects all of the string 
to the end of it. However, if there is 
another number, this second number dictates 
the length of the string which wiil be 
extracted. 


You can see in the Last two printouts from 
94 


Stringing Along 


the program that MID${A$,5,4) prints’ the 
extract of the string four characters’ long, 
starting from character five. MID$(A$,2,7) 
produces a string seven characters’ Long, 
starting from the second character. 


Rerun the program now, putting your name in 
place of THE*ELECTRIC*DICK in Line 10. 


PUTTING THEM BACK TOGETHER 


Strings can be added together on the VZ. The 
process of adding strings is called the 
frightening-~looking word concatenation. You 
can concatenate two or more complete strings 
together, or just add bits of them, as our 
next program shows: 


5 REM JOINING STRINGS 

7 CLS 

40 A$="DICK*SMITH" 

45 BS="*AUSTRALIA" 

20 CS=AS+BS 

25 PRINT "A$="sA$ 

30 PRINT "BS="sB8 

35 PRINT "C$="sC$ 

40 D=RND(8) :E=AND(12)+D 
45 PRINT "MID$(C$"D","E"}=" -MID$(C$,D,E] 
50 D$=MID$(C$,D,E) 

60 FOR J=1 TO 50:NEXT J 
65 GOTO 40 


When you run this program, which creates C$ 
in tine 35 by concatenating A$ and 8B§&, 
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you'LL see results Like these: 


A$=DICK*SMITH 
B$=*AUSTRALIA 
C$=DICK*SMITH*AUSTRALIA 
MID$(C$ 3 , 6 )=CK*SMI 
MID$(C$ 6 , 10 )=SMITH*AUST 
MIDS$(C$ 8 , 10 J=ITH*AUSTRA 


9 
MID$(C$ 2 , 5 }J=ICK*S 
MIDS(C$ 1, 4 }=DICK 
MID$(C$ 8 , 14 )=ITH*AUSTRALIA 
MIDS(C$ 4 , 12 }=K*SMITH*AUST 


PLAYING AROUND 


You can do a number of things with 
manipulation, as our next program 
strates. NAME PYRAMID allows you to 
your name to produce a somewhat interesting 


display. Once you've seen the 


running, you'LlL understand why it has been 


given its name. 
Here's the Listing: 


40 REM NAME PYRAMID 

20 CLS 

30 INPUT "WHAT IS YOUR NAME":N$ 
40 CLS 


50 IF LEN(N$}>15 THEN NS=LEFTS(NS$,15) 


60 FOR L=1 TO LEN(N$} 
70 PRINT TAB(16-L]} : 

80 FOR H=1 TO 2*L 

90 PRINT MID$(N$,L,1); 
100 NEXT H:PRINT 
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And here are two runs of the program: 


DDDD 
IITIIII 
cccccccc 


KKKKKKKKKK 
%*$208444406% 


*2eeeeeee dee 42 t 


SSSSSSSSSSSSSSSS 
MMMMMMMMMMMMMMMMMM 
ITIIIIIIIIIIIIIIIIITI 
TTTTTTTTTTTTTTTTTTTTTT 


HHHHHHHHHHHHHHHHHHHHHHAH 
SRCHHAAREEEKEEEEEREREE EE EES 


SSSSSeeSEERESEESAKRAKSEHEEEEEE SE KE 
SESE SSEKEEKEEEEEEEEEREEESHSEEEESE 


* * 


TTTT 
IIIJIII 
MMMMMMMM 
SHEER EEE SD 
HHHHHHHHHHAHA 
AAAAAAAAAAAAAA 
RRARRRRRARRRARRRRAR 
TTTTTTTTTTTTTTTITTT 
NNNNNNNNNNNNNNNNNANNN 
EEEEEEEEEEEEEEEEEEEEEE 
LLLLLLLLLLLLLLLLELLLLELLL 


LELLLLLLLLLLLLLLLLLLLLLLLL 
SPREREKEEEEEREEE TEESE RES ESD 
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In this chapter, we'll be Looking at three 
very important additions to your programming 
vocabulary: READ, DATA and RESTORE. 





They are used to get information which is 
stored in one part of a program to another 
part where it can be used. Enter and run 
this program to see them in action: 


10 REM READ/DATA 
20 CLS 

30 DIM A{5) 

40 FOR B=1 TO 5 


Reading DATA 


50 READ A{B} 

60 PRINT A(8) 

70 NEXT B 

80 DATA 3676,321 ,—473,4499,33 


Using Line 50, the program READs through the 
DATA statement in Line 80 in order, printing 
up each item with Line 60. 


RESTORE moves the computer back to the first 
item of DATA in a_e progran, as you'll 
discover if you modify the above program, by 
adding line 45 to it, so it reads as 
follows: 


70 REM READ/DATA 

20 CLS 

30 DIM A(5} 

40 FOR B=1 T0 5 

45 IF B=3 THEN RESTORE 

50 READ A(B} 

60 PRINT A[(B) 

70 NEXT B 

80 DATA 3676,321 ,—473,4499,33 


It does not matter where in the program the 
DATA is stored. The VZ will seek it out, in 
order from the first item of DATA in_ the 
program to the last, as our next program 
(which scatters the DATA about’ in an 
alarming way] convincingly demonstrates: 


1 DATA 3676 
10 REM READ/DATA 
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30 DIM A(5] 

40 FOR B=1 TO 5 
45 DATA 321,-473 
50 READ A(B) 

60 PRINT A(B] 

65 DATA 4499 

70 NEXT B 

80 DATA 33 


READ and DATA work just as well with string 
information: 


10 REM READ/DATA 

20 CLS 

30 DIM A$(5) 

40 FOR B=1 T0 5 

50 READ A${B) 

60 PRINT A${B) 

70 NEXT B 

80 DATA VZ300,DICK, SMITH, ELECTRONICS ,KANGAROO 


Note that string DATA does not have to be 
enclosed within quote marks, unless pre- 
ceding, or trailing spaces, and/or 
punctuation and symbols are significant, and 
must be considered part of the DATA. 


You can mix numeric and string DATA within 
the same program, so Long as you take care 
to ensure that when the program wants a 
numeric item, a number comes next in the 
DATA Line, and when it wants a string item, 
it can find what it needs: 


100 


10 
20 
30 


30 
60 
70 
80 
90 


Reading DATA 


REM READ/DATA MIXED TYPE 
CLS 

FOR B=1 TO 5 

READ A$,A 

PRINT A$,A 

NEXT B 

DATA DICK,23,SMITH,99 
DATA ELECTRONICS, 1231 
DATA VZ300,4,COMPUTER ,111 
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and refer to the item by just 
an 


within the tist 
You set up 


the position 
item occupies. 


array is used when you want to create 
the 


List of items, 
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An 
mentioning 
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A, and save 
A(G), A(1), 


the VZ will set up 


in its memory called 


for 


twenty-one items 


List 


space 


If you type in DIM A(20), 
102 


Getting Listed 


Al2)...and so on...up to Af{20). Each of 
these items —- the A{7) and the rest - are 
called elements of the array. 


When you dimension, or set up, an array, the 
VZ300 creates the List in its memory, and 
then fills every item in that List with a 
zero. So if you told your eoapurer to PRINT 
A(3), it would print a O. 


You fill the elements of an array with 
values with a statement tike A(3)=1000, or 
by using READ and DATA as we saw in the 
previous chapter. And once you've given an 
item a value, you can get the VZ to tell you 
what value the element has by typing in 
PRINT Aln). You can also manipulate’ the 
element as though it was a number. That is, 
A(4)*6 is valid, as if 45-A(6) and so on. 


The VZ300 will Let you use an array of up to 
eleven elements - that is, A({0O) through to 


A(10) —- without having to use a DIM 
Statement first. The moment it comes across 
the reference to an array, where the 


subscript (the number which follows the 
letter name of the array, in brackets, is 
called the subscript) is between 0 and 10, 
it automatically creates an array. However, 
it is good practice to always dimension 
arrays, even if you're only. using subscripts 
from 0 through to 10. 
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THE FORGOTTEN ELEMENT 


You may Like to ‘forget’ about the element 
which has the subscript of zero, and pretend 
that the array starts at one. Many’ times 
you'll find it easier, as I always do, to 
assume that a statement Like DIM A(80) gives 
you array of 80 elements (rather than 81, as 
is the case), and that the first element is 
A(1) rather than A(Q). 


The first program in this chapter dim- 
ensions, or sets up, an array called A, with 
room for 15 elements, although we will 
ignore the element with the subscript 0. The 
B Loop, from Lines 40 through to 60, fills 
the array with digits between 1 and 9, 
randomly chosen, and then prints them back 
for you with the Loop from 70 through to 100 
(with a slight pause being created by line 
90). 


Here is the Listing: 


40 REM ARRAYS 

20 CLS 

30 DIM A[(14] 

40 FOR B=1 TO 14 

50 A(B)=RND(9] 

60 NEXT 8 

70 FOR Z=1 TO 14 

75 PRINT TAB(4+(Z>9)}s 

80 PRINT "A("sz:") IS "sA(Z) 
90 FOR DELAY=1 TO 100:NEXT 
100 NEXT z 
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And here is one example of it in use: 


Af 1) IS 5 
A( 2) IS 7 
A( 3) IS 4 
A(t 4} IS 4 
At 5} IS 8 
A{ 6} IS 1 
A{ 7) IS 7. 
A(t 8s) Is 1 
A( 9) IS 8 
A{ 10) IS 4 
A( 11) IS 5 
A( 12) IS 7 
A( 13) IS 6 
A( 14) IS 8 


This is called a one-dimensional array, 
because a single digit follows the letter of 
the name which Labels the array. 


You can also have multi-dimensional arrays, 
in which more than one number fottows’ the 
array label after the DIM. In our next 
program, for example, the VZ sets up a two- 
dimensional array called A, consisting of 
five elements by five elements. It is dim- 
ensioned by the Line DIM A(4,4) as you’ can 
see in Line 30: 


40 REM MULTI-DIM ARRAYS 
20 CLS 
30 DIM A(4,4} 
40 FOR B=1 TO 4:FOR C=1 TO 4 
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50 A(B,C}=RND(9) 

60 NEXT C,B 

70 COLOR 8:PRINT " 423 4" 
80 PRINT TAB(3) s"####eeeREFEETE" 
90 FOR B=1 TO 4:PRINT Bs"#": 

100 FOR C=1 TO 4:PRINT A(B,C)+ 

110 NEXT C:PRINT "#"=:NEXT B 

120 PRINT TAB(S) s"###eeeeseeEEEE" 


When you run it, you'll see something Like 
this: 


123 4. 

FESEESEREREETE 
1#3 99 1% 
2#7 67 3# 
3#9 36 7# 
4#65 6 OF 

FEFESEESEESERE 


You specify the element of a two-dimensional 
array by referring to both its numbers, s0 
the element 1,1 of this array (the element 
in the top Left hand corner of the printout 
above} is 3 and is referred to as A({1,1). 
The 1 in the bottom row is Al4,3) and the 5 
next to it is Al4,4). 


STRING ARRAYS 


Your VZ3800 also supports string arrays. 
Enter and run the following short program to 
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see string arrays in operation: 


10 
20 
30 
40 
50 
60 
70 
80 
90 


REM STRING ARRAYS 

CLS 

DIM A$(5) 

FOR B=1 TO 5 
A$(B)=CHR$(RNO(25)+65) 
A$(B)=A$(B)+CHRS$(RND(25 }+65) 
NEXT B 

FOR B=1 TO 5 

PRINT TAB(4)s"A$("sBs"} IS ":A$(B) 


100 NEXT B 


Here's one printout of the program: 


A$( 1) IS DZ 
A${ 2) IS ZM 
A$S({ 3) IS YT 
A${ 4 ) IS XF 
A${ 5 ) IS SY 


You can, of course, fill the elements of an 
array, string or numeric, via DATA or INPUT 


statements. 


Here is a string array which is 


filled using DATA: 


10 REM STRING ARRAYS 
20 CLS 

30 DIM A$(5) 

40 FOR B=1 TO 5 

50 READ A$(B) 
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70 NEXT B 

BO FOR B=5 TO 1 STEP — 

90 PRINT TAB(4);"A8(";B;") IS "sA${B) 

100 NEXT B | 

110 DATA ELECTRONICS, SMITH,DICK ,FROM,VZ300 


This is the result of running it: 


A${_5 } IS vz300 

A$( 4 } IS FROM 

A${ 3 ) IS DICK 

A${ 2 ) IS SMITH 

A$S{ 1 ) IS ELECTRONICS 


ESCAPE FROM MURKY MARSH 


The final program in this chapter demon- 
Strates the use of a two-dimensional array 
for ‘holding’ an object, and for moving it 
around within the array. The shape is 
trapped in a murky marsh, and by moving 
totally at random, it hopes one day to be 
ablLe to escape from the marsh. The shape is 
free if it manages to stumble onto the outer 
rows. 


The shape in this program, by the way, 
demonstrates ‘Brownian Motion', the random 
movement Shown by such things as tiny 
particles in a drop of water when viewed 
under amicroscope, or of a single atom of 
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gas in a closed container. Brownian motion 
explains why a drop of ink gradually mixes 
into the water into which it has’ been 
placed. 


Here is the program Listing, showing 
Brownian Motion in action in the murky 
marsh: 


40 REM MURKY MARSH 
20 CLS 

30 DIM A(10,10) 

40 M=0 

50 GOSUB 240 

60 IF Q>9 OR P>9 THEN 320 

70 P=P-1:IF AND(O)>.35 THEN P=P+2 
80 Q=G-1:IF RND(O}>.35 THEN Q=0+2 
90 IF <4 THEN Q=1 

100 IF Q@™0 THEN Q=10 

410 IF P<4 THEN P=1 

120 IF PMO THEN P=10 

430 M=M+1 

440 PRINT @40,"ATTEMPT NO."M" 
150 A[P,Q}=94 _ 

460 PRINT @65, 

470 FOR X=1 TO 10 

475 PRINT TAB(10)s 

180 FOR Y=1 TO 10 

190 PRINT CHRS{A(X,Y}); 

200 NEXT Y 

240 PRINT 

230 NEXT X:SOUND RND(31) »1 

235 A(P,Q}=254:GOTO 60 

240 O=AND(3}+4 

250 P=RND(3)+4 
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110 


260 
270 
280 
290 
300 
310 
320 
330 


FOR X=1 TO 10 

FOR Y=1 TO 10 

A(X,Y)=254 

NEXT Y,X 

RETURN 

REM — THE END — 

PRINT 

PRINT TAB(S}¢"wHEW! FREE AT LASTI" 


Chapter Twelve — Using the Graphics 


Your VZ3800 can produce some very effective 
displays, using the different modes’~ and 


colours. 


THE MODES 


As you know, the VZ can operate with two 
different kinds of display, called modes. 
The first mode, and the one which is”7 most 
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frequentLy used, is mode 0, which is pre- 
dominately a text mode. The VZ is in this 
mode when you first turn it on. 


You can use numbers, Letters and the onboard 
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'chunky' graphics in mode 0. This mode has a 
resolution of 31 by 16. That is, the screen 
can fit 32 characters across and 16 down, as 
if it was divided into 512 Little rect- 
angles, each of which holds one character. 
Using the chunky graphic blocks —- the Little 
squares with bits missing from them on the 
keyS -— can give you the effect of producing 
pictures on a slighly higher resolution, 64 
by 32. 


The second mode, mode 1, is the high res- 
olution Graphics mode. Relatively find 
individual points can be printed on the 
screen to create clear pictures. You cannot, 
however, print text in this mode. 


The mode 1 resolution is 128 by 64, with 128 
points across and 64 down. The co-ordinates 
of these points, which are called pixels in 
VZ-speak, begin in the top Left hand corner 
of the screen, at the point described as the 
Location (0,0). 


USING COLOUR 


You can use colour in both modes’ (Calthough 
the command uses the American spelling of 
'color'). The background screen colour can 
be green or orange. As you know, the screen 
is green when the computer is first turned 
on, but it can be changed to orange very 
simply, just by typing in the following, 
then pressing RETURN: 


COLOR ,1 
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Note the comma before the number. To turn 
the screen green again, without turning the 
computer off, enter this: 


COLOR ,0 


There are eight colours which can be used in 
both modes. In mode 0, these colours’ can 
only be used on the onboard graphics. 
High resolution colour is slightly different 
from that used in mode O. You have to assign 
a colour to the plotted points, or you won't 
be able to see them. 


The high resolution background colours’ are 
green and grey. You need to use two numbers, 
as well as the two co-ordinates, to assign a 
colour to a pixel. Try this: 


10 MODE(4) 

20 COLOR RND(4) ,1 
80 X=AND (120) 

40 Y=RAND(60) 

50 SET(X,Y) 

60 GOTO 20 


The SET function assigns the co-ordinates 
for a point. The word SET is on the 'H' key. 
Two numbers, or variables, allow SET to plot 
a point at the co-ordinates given. RESET 
clears these points from the screen. 


THE TWO MODES 
Before we go on to use SET to produce’ some 


very interesting displays, you might Like to 
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try the following two programs which make it 
extremely clear how the two modes differ on 
the VZ300. 


As you can see from the Listings, the first 
one, for mode QO, uses PRINT@ to position the 
coloured blobs, while the second program 
uses SET. 


40 REM TEXT RESOLUTION 

20 COLOR,1:CLS:PRINT:PRINT 

30 INPUT "WHAT'S YOUR NAME"=N$ 

40 CLS 

50 COLOR RND(8) 

60 PRINT @(RND(512) ) ,CHRS(141) sN$;CHRS(142) 
70 SOUND RND(31),1 

80 GOTO 50 


10 REM HIGH RESOLUTION 

20 CLS | 

30 INPUT "WHICH BACKGROUND (0 OR 1)"5B 
40 IF B<O OR 8B” THEN 30 

50 MODE{1} 

60 COLOR RND(8),B 

70 SET (RND(127),RND(63)) 

60 SOTO 60 


SPIROGRAPH PATTERNS 


Spirograph patterns are formed by both’ the 
interior and exterior epicycloid curves (no, 
I don't know what that means, either, but it 
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Says so in my encyclopedia). One of the 
formulae for such a curve is given in’ Line 
100 of the following program, in which A is 
the radius of a Large circle, B is’ the 
radius of a smaller circle, and H is a point 
on the circumference of the smaller circle. 


The program choses A, 8B and C at_- randon, 
then traces out the shape on the screen. The 
finished pattern is held for a moment, then 
the process begins again. This program shows 
clearly how effectively the SET command can 
be used and produces pictures which are 
worthy of close examination. 
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If you don't Like a particular pattern which 
is forming, or you can't see one at all, 
which wilt happen rarely with some colour 
combinations, just press any key and a new 
design will begin. Some of the results of 
this program are very, very attractive 
indeed. You'Ll find the patterns look best 
if viewed from a slight distance. 


Here's the SPIROGRAPH program Listing, so 
you can get those epicycloid curves to do 
their thing: 


10 REM SPIROGRAPH 

15 PI=3.141592 

20 MODE(1) 

25 COLOR INT{RND(0)*3)+2 

30 IF INKEY$<>"" THEN 30 

40 A=RND(15) 

50 B=RND(15) 

60 H=AND(15) 

70 FOR J=0 TO 3*PI/1.7 

80 FOR Q=0 TO 2*PI STEP PI/60 

90 X=({A-B)*COS[Q)+H*COS{ [A-B} *Q/B+J] 
95 IF INKEY$<>"" THEN RUN 

100 Y=[{A-B) *SIN(Q)+H*SIN( (A-B) *Q/B+u) 
110 SET((60+X),(32+Y)) 

120 NEXT Q 

130 NEXT J 

140 FOR T=1 TO 1000:NEXT T 

150 RUN 
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LISSAJOUS FIGURES 


Jutes Antoin Lissajou, a French physicist 
who Lived from 1822 to 1880, made a study of 
the movement of particles under the action 
of periodic motions acting at right angles 
to each other (fat least that sounds a Little 
simpler than those epicycloid curves). Jules 
discovered that bodies moving in this” way 
trace intricate patterns as they dance 
around each other. 


As in the SPIROGRAPH program we've just 
Looked at, SET is used to plot the points on 
the screen, tracing out the path of the sum 
of the periodic motions. 


Here are some examples of the effects’ the 
program can produce. Of course, they are far 
more attractive and dynamic in colour on the 
screen than the dull old black and white 
printouts here suggest. 
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There are two versions of the program. The 
first one allows you to enter your-= own 
choice of STEP and X and Y frequencies. 
STEPs should be around SO or more if the xX 
and Y frequencies are in single figures, and 
correspondingly more as the size of the 
frequency is increased. The higher the STEP 
number, the greater the resolution of the 
final figure. 


For a start, enter this program into your 
VZ300: 


10 REM LISSAJOUS FIGURES 

20 PI=3,141592 

25 CLS 

30 INPUT "STEPS":S 

34 REM ENTER 0 TO END 

35 IF S=0 THEN END 

40 INPUT "Y FREQUENCY":Y 
118 


Using the Graphics 


SO INPUT "X FREQUENCY” sx 

80 MODE (1) 

82 Z=INT(RND(0)*3)+2 

85 COLOR [Z) 

90 FOR A=0 TO 2*PI STEP PI/S 

400 SET ((20*SIN{A*Y)+50) , (20*COS{A*X)+30) ) 
110 NEXT A 

120 FOR T=1 TO 2000:NEXT T 

130 RUN 


Try the following sample values with this 
program: 


STEP 


~< 
x 


50 
60 
60 
60 
§0 
600 
300 
175 
500 
500 
200 
250 
500 
500 


meek, 
BS 

@ e 
Nn 


monk 


Lee} 
SAAsMODAAAMWSHA™ 


i D WG On BW SEO GH GA = 


m= PQ 
La) 


DOING IT AT RANDOM 


The next program chooses the two frequencies 
at random, with a number between 1 and 20. 
The STEP size is fixed at 500, but there is 

1139 


Programming the VZ300 


no reason why you should not change that if 
you wish. There is a slight pause at the end 
of each figure, and then the screen clears 
and a new figure begins: 


40 REM AUTO-LISSAvOUS 

20 PI=3 .141592 

25 CLS 

30 S=500 

40 Y=RAND(20] 

50 X=RND[20) 

80 MODE (1) 

82 Z=INT(RND(0}*3)+2 

85 COLOR (Z) 

90 FOR A=0 TO 2*PI STEP PI/S 
400 SET ((20*SIN{A*Y)}+60} , (20*COS(A*X)+30) ) 
405 IF INKEY$<>"" THEN 40 
410 NEXT A 

120 FOR T=1 TO 2000:NEXT T 
430 GOTO 40 


The final version of the program is simply a 
modification of the preceding one. In _ this 
version, the screen does not clear between 
each image, so eventually you will end up 
with a very complex overlay of designs: 


10 REM AUTO—LISSAJOUS 
20 PI=3,141592 
25 MODE(1) 
30 S=500 
40 Y=RND[20) 
50 X=RNO(20) 
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82 Z=INT(RNO(0)*3)+2 

85 COLOR [Z) 

90 FOR A=0 TO 2*PI STEP PI/S 

100 SET ((20*SIN(A*Y)+60) , (20*COS[A*X}+30) ) 
105 IF INKEY$<>"" THEN 40 

4110 NEXT A 

120 FOR T=1 TO 2000:NEXT T 

130 GOTO 40 


WEAVING MARTIAN LACE 


As you know, the SET command is used _ to 
place dots of colour on the screen at 
positions specified by the numbers”) which 
follow the command. 


SET(X,Y) places a pixel at Location X (which 
can be zero to 127, the distance across the 
screen from Left to right) and Location Y (a 
number from zero to 63, being the count down 
the screen). 


Our next program, MARTIAN LACE, uses SET to 
produce a balanced, and highly attractive, 
design on the screen. As you'lLt see when you 
run it, the design continues to unfold for 
as Long as you watch it: 


10 REM MARTIAN LACE 
20 MODE([1) 

30 X=RND(63) 

40 Y=RND(31) 

50 Z=RAND(4) 

60 COLOR(Z) 
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70 SET(X,Y) 

80 SET(128-X,Y) 

90 SET(128-X,64-Y) 
100 SET(X,64-Y) 
110 GOTO 30 


THE MOTION PICTURE MAN 


You can use the computer as a kind of ‘etch- 
a-sketch' toy in mode 1. You enter a number 
(2, 3 or 4) to select the colour you want, 
then use the arrowed keys to draw designs of 
your choice on the screen. The image begins 
in the top Left hand corner of the screen. 


10 REM MODE 1 SKETCHER 

20 CLS:INPUT A 

30 MODE(1} 

40 COLOR A 

50 X=0:Y=0 

60 REM — DRAW PICTURE — 

70 C$=INKEY$ 

80 IF C$="," AND X<127 THEN X=X+4 
90 IF C$="M" AND X>0 THEN X=X~1 
100 IF C$="," AND Y>0 THEN Y=Y-1 
110 IF C$=" " AND Y<63 THEN Y=V+1 
120 SET(X,Y) 

130 IF C$="C" THEN COPY 

140 IF C$="R" THEN RUN 

450 IF C$="N" THEN 50 

160 IF C$="E" THEN 190 

170 IF C$="S" THEN END 

180 GOTO 70 

190 GOTO 190 
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As well as responding to the arrow keys, the 
program accepts, and acts aon, the following 
commands: 


C - Copies pictures created to s40me 
printers (Such as the Seikosha GP-100 
on GP-100A) 

R - Azuns the prxogrzam again from the 
beginning 


N - moves the cursor hack to the start 
position 


E - 42eezes the picture 

S - Stops the program 
That brings us to the end of this chapter on 
using the graphics. You're sure to be work 


on the ideas given here to exploit’ the 
graphics potential of your VZ to the full. 
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There is Little doubt that moving graphics 
Games, such as the ones you see in arcades, 
are among the most exciting things you’ can 
run on a computer. Although the programs we 
select in this section of the book are in no 
way as sophisticated as arcade games, 
techniques given will allow you to write 
moving graphics games of your own, and will 
give you some insight into arcade-standard 
programs. So even if you're a bit short of 
cash at the moment to buy software, you can 
use the material from this chapter a 
yourself while you save up. <} 
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THE SECRET OF ANIMATION 


It is simple to make something appear toa 
move on the VZ screen. You put ae shape, 
such as the Letter "A", on the screen in a 
particular spot, and wait a moment or two. 


Then you print a blank space where the "A" 
was, and at the same time, print a new "A" a 
short distance away from its original 
position. The eye will be footed into 


thinking the A has moved from the i first 
position to the second. 


This process iS repeated over and over 
again, and it creates the impression that 
the object is moving. That's all there is to 
it. Put one moving object under your 
control, and another one under the VZ3800's 
control, and you have the raw ingredients of 
a game. Let's see how it works in practice. 


USING PRINT®@ 


As you know, in the text mode the VZ's 
Screen is 32 characters across, and 16 Lines 
down. The PRINT@ command works by’ counting 
the very first position on the screen (the 
one in the top, left hand corner) as number 
0. It counts across the Line, then gets to 
position 3% at the right hand end of the 
line. Position 3e is the first one at the 
Left hand end of the second Line. This goes 
right through the screen, with the _ final 
position, in the bottom right hand corner, 
as position number 511. 
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We' LL start by putting something on the 
screen. Enter our next brief program and run 
it. When you see the question mark appear, 
enter two numbers separated by a comma. The 
first is the number of Lines down you~ want 
the object to appear, and the second is the 
number of spaces you want the object to be 
across the screen. The first number must be 
between OO and 15 and the second number 
between OQ and 31. 


Enter the program, run it for a while, then 
return to the book: 


40 REM PRINT @ DEMO 

20 CLS 

30 INPUT A,B 

40 PRINT @[32*A+B) ,"A" 
50 PRINT @0," n" 
60 PRINT @0,: 

70 GOTO 30 


Note the use of the formuta in Line 40, 
which changes the numbers which have been 
entered as down and across co-ordinates into 
a single number which the PRINT@ command can 
use. In the next chapter, we'Ll use a 
Similar formula for PEEK and POKE, but we'll 
stick with PRINT@ for the time being. 


You'll find you're using the formula 
PRINT@(32*A+B), or a similar one to it, time 
and again in programs, 
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FOLLOW THE BOUNCING BALL 


We'lLL now use PRINT@, and our formula, to 
create a bouncing ball program. NEW the VZ 
to get rid of the program which is now in 





it, and enter the following program, then 
return to the book for a discussion on it. 


You'll find the techniques that are used for 
animating this batl can be used in many, 
many moving graphics games which you write. 
So it is worth taking the trouble at this 
point to understand exactly how it works, so 
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you can apply the techniques to your own 
programs. 


10 REM BOUNCING BALL 1 
15 CLS 

20 A-6:B=11 

30 Y=1:X=1 

40 EA=A:EB=8 

60 PRINT @ [(32*B+A),"0" 
70 B=B+X 

80 A=A+Y 

90 IF A<2@ THEN Y=-Y 
100 IF A>30 THEN Y=~Y 
110 IF B<2 THEN X=-X 
120 IF B14 THEN X=-X 
130 GOTO 40 


When you run this, you'll see the ball 
appear on the screen, bouncing from the 
sides, and leaving a trail behind it. I 
deliberately did not erase the ‘old' ball in 
this program, so you could see that it 
really was just a series of the same _ char- 
acter being printed at different positions 
on the screen. 


Now, add this Line and see what happens: 


125 PRINT @(32*EB + EA),"," 


When you run the program again, you'Ll see 
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something Like this on the screen: 


As you can see, it Leaves a trail of dots 
showing where the ball has been. Remove the 
dot from between the quote marks in Line 
125, and run the program again, to see a 
true bouncing ball. 


This program gives a very good impression of 
a moving object. As I said earlier, this 
simple bouncing ball demonstration shows a 
number of key things about moving graphics 
programs, so we'Lt go through the’ program 
Line by Line, explaining what each Line is 
doing. 


15 - clears the screen 


e0 - sets the start position of the ball, 
at 7 across and 12 down 
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30 - 


40 - 


70 - 


90 - 


100 - 


110 - 


130 


sets X and Y which control the change 
in position of the ball between’ each 
movement 


sets two variables used to erase the 
old position. These are calted EA (for 
'erase A') and EB (for ‘erase 6B'),. 
It's not a bad idea to use _ variable 
names which suggest the job the 
variable is doing in the program, as 
it makes it much simpler Later on when 
you're going through the program, to 
keep track of what each bit of it 
does. Note, and this is important, EA 
and EB are set equal to A and B-~ just 
before the ball is printed at 32*B+A 
(Line 60) and before A and 8B are 
modified (tines 70 and 80) 


this prints the ball on the screen 

B (the down position) is changed 

A (the across position) is changed 
this checks that the A position is not 
too far to the Left, andif it is, 
changes Y to minus Y, which causes the 
ball, next time it comes to this Line, 
to reverse its direction, so it 
appears to bounce 


does the same for the right hand side 


checks the up/down position, and if 


the ball is too close to the top of 
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the screen, changes X to minus X 
which, as you'd guess, causes the ball 
to bounce down from the top of the 
screen 


120 —- does the same for the bottom of the 
screen 


125 - prints a blank on the 'old' position 
of the ball (that is, the position 
designated by A and B before they were 
modified by tines 70 and 80) 


1830 - sends action back to Line 40, where EA 
and EB are set equal to the ball's new 
position, before it is reprinted in 
the new position with tine 60 


Although this explanation is fairly long, 
and much Longer than the program it is 
explaining, it iS worth reading through it 
carefully. Once you understand it, you'll be 
well on the way to writing your own 
programs. 


Now modify the program so it is as’ follows. 
In this version, there is a Little object at 
the bottom of the screen which is your 'bat' 
and you have to get the ball to bounce off 
it to keep the ball moving. 


You use the 'Z' key to move Left, and _ the 


'M' key to move the bat at the bottom of the 
screen to the right: 
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10 REM BOUNCING BALL 2 

45 OLS 

20 A=6:B=11:F=11 

30 Y=1:X=1 

40 EA=A:EB=8B 

S590 PRINT @(445+F)," "sCHRS(138141)3" " 
GO PRINT @ (82*B+A),"0" 

70 B=B+X 

80 A=A+Y 

82 AS$=INKEYS 

85 IF A$="Z" AND F>3 THEN Fe=F-—2 

86 IF AS$="M" AND F<29 THEN F=Fe+2 

90 IF A<@ THEN Y=-Y 

100 IF A>380 THEN Y=-Y 

1710 IF B<2 THEN X=—=xX 

120 IF B>12 AND ABS(F-A)<3 THEN X=-xX 
121 IF B=16 THEN END 

125 PRINT @(32*EB + EA)," " 

130 GOTO 490 


Now, this is not a particularly satisfying 
game (it probably doesn't even deserve’ the 
title ‘'game'), but it shows some extra 
ingredients you'll probably be using 
yourself in moving graphics games. In _ this 
program, outside interaction is brought into 
play for the first time Cyou moving the bat) 
and the computer responds to this (keeping 
the game underway if the bat is in the right 
position). 


Here's what the extra Lines do: 


20 - F is the position of the bat across 
the screen 
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90 - this prints the 'bat'. If you prefer, 
instead of using CHR$(131), you can 
use the graphics character available 
directly from the '‘'Y' key (using 
SHIFT). Note that there must be two 
blank spaces within the quote marks on 
both sides of the character, to '‘un- 
print' the bat as it moves 


S82 - this read the keyboard, with INKEY$, 
and sets the result of this reading 
equal to A$§$ 


85 - if A$ equals "Z" (that is, if you are 
pressing the "Z" key) and F is greater 
than 3, the value of F is reduced by 
2. As F controls the position of the 
bat across the screen, reducing F 
moves it to the left 


120 - if B is greater than 13 (which means 
the ball ts near the bottom of the 
screen), the position of the bat is 
checked, and if it is close to _ the 
ball, a bounce occurs, and the game 
continues 


121 - if the ball has missed the bat, this 
Line halts the program 

This is not, as I said, a very inspiring or 

Challenging game, but with afew minor 


changes can be given a bit of value. Modify 
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1t so that it reads as follows, and play 
with it a bit: 


40 REM BOUNCING BALL 3 

12 REM 'SQUASH' 

15 CLS 

17 PRINT @ 227,°——-——--——--__--——" 
48 FOR J=256 TO 416 STEP 32 

419 PRINT @," > <"s NEXT 
20 A-6:B=11:F=11 

25 sC=1 | 

30 Y=1 :X=1 

40 EA=A:EB=B8 

50 PRINT @(445+F)," "sCHRS(137)2" * 
60 PRINT @ (32*B+A),"*" 

70 B=B+X 

80 A=A+Y 

82 A$=INKEY$ 

85 IF A$="Z" AND F>8 THEN F=F—2 

86 IF A$="M" AND F<24 THEN F=F+2 

80 IF A<7 THEN Y=-Y 

100 IF A}17 THEN Y=-Y 

4110 IF B<S THEN X=-X 

120 IF 8=13 ANDO ABS[{F-A)<3 THEN X=-X 
421 IF B=15 THEN END 

122 IF B=13 THEN SC=SC+367:PRINT @68,"SCORE IS "sSC 
425 PRINT @(32*ES + EA)," " 

130 GOTO 40 


Again you'lk have to use the 'Z' and 'M! 
keys, but this time you have ae smaller 
‘playing fieltd', and there is a bit more of 
a challenge to the game. You might Like to 
spend some time playing with this’ program, 
modifying it aS you see fit, before 
returning to the book to discuss moving an 
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object up and down, as well as to the right 
and left, on the screen. 


TRAPPER 


We now have a program which is Somewhat more 
difficult - and enjoyable - to play, in 
which an 'X' is stalked by the’ prehistoric 
'@' symbol. Stirring stuff. 





In this program, you are the 'X' and the 
VZ300 controls the ‘'@', You use the 
following keys to move yourself around’ the 
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screen, trying to stay out of the VZ's 
clutches for as long as possible: 
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A - to move up 

Z- to move down 

M- to move Left (See arrow on this 
key) 

, ~ to move right (see arrow) 


10 REM TRAPPER 

15 CLS:T=0 

20 BA=5:8D=5 

30 TH=20:TV=14 

40 EA=BA:ED=8D 

50 EHX=TH: EV=TV 

60 PRINT @ (32*ED+EA}," " 

70 PRINT @ (32*TV+TH)," * 

80 A$=INKEY$ 

30 IF A$="A" AND BD>2 THEN BO=BD—1 
100 IF A$="2" AND BD<14 THEN 8D=8D+1 
110 IF A$="," AND BA<30 THEN BA=BA+1 
120 IF A$="M" AND BA>2 THEN BA=BA-1 
130 PRINT @ (32*8D+BA), "x" 

135 IF RND(2}=2 THEN 150 

140 IF BDSTV THEN TV=TV+1 

145 IF RNO(2)=2 THEN 160 

150 IF BO<TV THEN TV=TV--1 

155 IF RND(2)=2 THEN 170 

160 IF BA<TH THEN TH=TH-1 

170 IF BA>TH THEN TH=TH+4 

180 PRINT @ (32*TV+TH] ,"e" 

185 T=T+1 

190 PRINT @ G,"TIME ELAPSED"T 

210 IF BD=TV AND BA=TH THEN SOUND RND(20},1:GOTO 210 
220 GOTO 40 
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There is no need to go through this program 
Line by Line, as I'm sure that by now” you 
have a pretty good idea of what effect the 
various parts of the program have. 


The main differences between TRAPPER and the 
BOUNCING BALL series of programs is that we 
are now moving the object under our’ control 
in two dimensions, and that the thing which 
is trying to trap us, can 'sense' {using 
Lines 1385 to 170) just where we are. The 
Lines 185, 145 and 155 are just to give you 
a chance. Take them out, and you'll be dead 
within ten moves, every single time. 


This program points up one of the 
disadvantages of working in BASIC, 
especially with PRINT@. It is fairly stow, 
and everything we add to a program slows it 
down further. 


Fortunately, there is another way to move 
things on the screen, using PEEK and POKE. 
We'LL be tooking at those in the next 
chapter. 
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PEEK and POKE are weird words. Unlike GOTO, 
PRINT and IF/THEN, they are not the sort of 
words which immediately suggest what they're 
used for. 


In fact, PEEK and POKE seem to inspire more 
fear and confusion in programs when they 
first come across them than any other’ words 
in BASIC. There is no need to worry. They 
are simple to use, and their use follows the 
ways we used PRINT@ in chapter 138. 


Although they can be used in programs in 
place of PRINT@, PEEK and POKE are not just 
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strange-sounding substitutions for them. 
There are two advantages in using’ them. 
Firstly, POKE is faster than PRINT@., 
Secondly, PEEK can be used to find out what 
1S on the screen at a particular position. 
This is ideal for discovering whether or not 
an alien has been shot, or the plane you are 
flying has hit the side of a mountain. 


When you POKE something onto the screen, you 
put it there. When you PEEK the screen, you 
are Looking to see what is on the screen at 
that particular position. And that's just 
about aLl you have to remember. 


If you have two co-ordinates of a position, 


such as A (for 'across']) and D (for ‘'down), 
you PRINT@ then, as explained in the 
previous chapter, using the formula 


PRINT@(32*D+A). To POKE something onto the 
screen, you use a Line which is related to 
it, as follows: 


POKE 28672+32*D + A, X 


I generally use 28672, the location of the 
top left hand corner of the screen, or 
28736, the position two Lines below it. The 
X is the character number, and this is the 
Character which will appear when we POKE 
directly to the screen. 
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You'll remember that, when working with 
PRINT@, we used a espace (" ") to wipe 
something off the screen. The POKE 
equivalent to this is 38e, So... 


POKE 28672 + 32*D + A, 32 
-.--1S equivalent to... 


PRINT @ (32*D + AJ," " 


If you want to find out what is at a 
particular address (the tocations on _ the 
screen are called ‘taddresses'), you use PEEK 
as follows: 


IF PEEK (28672 + 32*D + A) = ... THEN ... 


Now, PEEK and POKE are simpler to use- than 
they may appear at first sight. I suggest 
you enter the following programs, which use 
the two commands, and follow through the 
Listings carefully. This will allow you to 
Learn about the use of the two words’7 more 
quickly than any other way. 


MESOZOIC ATTACK 


The Mesozoic Era was the time when fierce 
dinosoars, Like the Dickus Smithus 
Electronicus, roamed the earth. Our program, 
MESOZOIC ATTACK, is really a PEEK/POKE 
version of TRAPPER. Only POKE is used in 
this program, toa introduce you to the new 
words in a gentle way. 
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The control keys are the same as in TRAPPER, 
with 'A' and 'Z' to move you up and down, 
and the arrow keys 'M' and ',' to move-~ you 
left and right. 


10 REM MESOZOIC ATTACK 

15 HS=0 

20 COLOR ,0:CLS 

30 SC=0 

40 HA=1 :HD=1 :D=15:A=30 

50 EA=HA:ED=HD 

60 IF INKEY$="A" THEN HA=HA~1 
70 IF INKEY$="Z" THEN HA=HA+1 
80 IF INKEY$="," THEN HD=HD+1 
90 IF INKEY$="M" THEN HO=HD—1 
91 IF HA<1 THEN HA=1 

92 IF HA>14 THEN HA=14 

93 IF HD<1 THEN HD=1 

94 IF HD>31 THEN HD=31 

95 EB=SB 

100 SB=28672 + 32*D+A 

110 IF SB=H THEN 1000 

115 POKE EB,143 

120 POKE SB,(36+RND(2)) 

130 H=28672 + 32*HA+HD 

140 IF SB=H THEN 1000 

4145 POKE EH,143 

150 POKE H,88:EH=H 

160 IF D<HA THEN D=D+1 

165 IF RNO(9}>3 THEN 180 

170 IF DOHA THEN D=D~—1 

175 IF RND(9}>3 THEN 196 

180 IF A<HD THEN A=A+1 

190 IF A>HD THEN A=A-1 
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200 SC=SC+1 

210 PRINT @ 20,"TIME>"SC 

240 IF D<4 THEN D=1 

250 IF 0214 THEN D=14 

260 IF A<4 THEN A=1 

270 IF A>381 THEN A=31 

275 IF SB=H THEN 1000 

280 GOTO 50 

4000 POKE SB,143:POKE H,143 

1001 POKE EB,143:POKE EH,143 

4002 FOR J=4 TO 19 

4003 POKE SB, (80+RND(19)} 

4005 PRINT @ 453,"I GOT YOUI!I" 
1010 SOUND RND(20)+1,1 

1020 NEXT J 

1030 PRINT @226,"YOU SURVIVED FOR"SC 
4035 IF SCOHS THEN HS=SC 

1040 PRINT @258,"BEST SO FAR IS"HS 
4050 FOR T=1 TO 500:NEXT T 

1060 GOTO 20 


And from the distant past, we move to the 
far distant future with our next program, 
which uses PEEK to ‘read! the screen. 


V-WING SPACE BATTLE 


In this program, you pilot your Little V- 
wing space craft around the VZ_ screen, 
trying to run over the numbers which appear 
on it. Each number will appear for a Limited 
amount of time, and if you run over it, a 
score related to that number will be added 
to your growing tally. 


PEEK is used here, for the first time in one 
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100 FOR z=1 TO 20 

401 COLOR,O 

410 SL=28796:M=22:D=-32 

420 POKE (28745+RND (467}) ,(RNO(9)+48) 

4130 W=SL 

440 A$=INKEY$ 

150 IF A$="," THEN SL=SL+1:M=62 

460 IF A$="M" THEN SL=SL-1:M=60 

470 IF A$="A" AND SL>28736 THEN SL=SL-32:M=1 
180 IF A$="Z" AND SL<29151 THEN SL=SL+32:M=22 
490 O=PEEK(SL) 

200 IF @>48 AND O<58 THEN SC=SC+0:GOTO 980 
205 POKE wW,143 

210 POKE SL,M 

220 IF RND(O)<.99 THEN 130 

230 COLOR,1:FOR T=1 TO 20:NEXT T:COLOR,O 
980 CLS:PRINT @ Q,"SCORE "sSCs" "s90-Z:" SHIPS LEFT" 
982 COLOR, INT(RND(0)*2) 

985 SOUND RND(25),1:IF RND(10)>6 THEN 982 
$90 COLOR,O:NEXT Z 

995 CLS:PRINTsPRINT:sPRINT 

4000 PRINT "THE BATTLE IS OVER tt 

4003 PRINT:PRINT 

1005 PRINT "YOUR SCORE IS"SC 

1100 COLOR, INT(RND[(0)*2)} 

4120 SOUND RND(25),1:GOTO 1100 


You can see from how the screen is ‘read! in 
tine 190, and the use which is made of that 
information in Line 200 (which adds to your 
score, then ends action toa line 80 to 
prepare the next 'target'), how PEEK’ can 
greatly simplify your programs where-= you 
must discover if two objects have collided. 


You should also be pleased to discover that 
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Chapter Fifteen — Structured Programming 


There will come a point in your development 
as a programmer when you'll have mastered 
the use of much of the use of BASIC on the 
VZ300, and can now concentrate on writing 
batter programs; programs which work after 
relatively Little debugging, which are easy 
for others to understand and operate, and 
which are written Logically and elegantly. 


Your programs will be more Likely to run 
first time if they are planned out carefully 


before you start actually programming into 
the VZ300. 
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A good way to start is to use a diagram 
which is often called a 'flow chart'. A flow 
chart is a series of boxes and other shapes, 
joined by lines, which show the flow of 
action and decision-making within the 
computer while the program is running. 


The shapes used are not too important, and I 
Suggest you stick to just two: a rectangle 
for most actions the computer must carry 
out, with a diamond shape each time the 


computer has to make ae decision. The 
corners of the diamond can be used —- as you 
can see in the diagram ~- to cater for the 


alternatives facing the computer. 


The diagram shows the flow chart of a 
program which sets the variable X equal to 
zero, then adds one to it. The value of X is 
checked. If xX is found to be less than 20, 
the program goes back to add one to X again. 
This continues until the value of X becomes 
equal to 20. 


E-ND <—- NO 
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One advantage of using a flow chart is” that 
you do not get Locked, at an early stage of 
your work, into the peculiarities of VZ300 
BASIC, its weaknesses and strengths, which 
you are using. Instead, you concentrate on 
what you want to do. Of course, you may have 
to modify your plans slightly to accept 
Limitations dictated by your programming 
Language, whatever it may be, but you do not 
have to bend to these Limitations (which may 
be, in part, imaginary) at the start of the 
process, 


A flow chart is ‘universal’. The same flow 
chart can be used as the basis of a program 
written on some other computer which is 
furnished with a completely different 
Language from that which is on the VZ300. 


A flow chart models the flow of action = and 
Logic within a program, andis' therefore 
very useful for picking up potential bugs at 
the earliest stages. You may, for example, 
find that one condition for the program will 
test will never be fulfilled, possibly 
Leading to the program being trapped in an 
infinite Loop. Other parts of the code may 
be bypassed completely, because the 
condition which triggers entry into’ that 
part of the code will never be met, 


Once you've devised a flow chart for your 
program, and you've run through it mentally 
a few times, so that the most obvious’ bugs 
are removed, you should reduce the _ flow 
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chart to a series of subroutine calls. 
Although it seems pretty silly to do this 
for a simple program Like our "SET X EQUAL 
TO ZERO, ADD ONE, CHECK IF LESS THAN 20" 
program, this method comes into its own with 
more complex programs. 


PROGRAMMING IN MODULES 


I think it's a good idea to start a long and 
complex VZ300 program with a series of sub- 
routine calls, with each action of the 
program being looked after by a separate 
subroutine. Then, if the steps within a 
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program have to be performed several times 
in a particular sequence, the series of 
subroutine calls can be cycled through - 
over and over again —- until a $particular 
condition is met which signals the end of 
the run. 


You'll recognize how useful this approach to 
programming can be when you get to the 
debugging stage of your program. If there is 
a bug, it is Likely to be within a single 
Subroutine, so it will be relatively easy to 
pin down the subroutine which contains” the 
bug, rather than having to work right 
through the program trying to track it down. 


Working with subroutine ‘modules! in this 
way allows you to test sections of the 
program in isolation, even before the entire 
program is finished, I'tLl try to make this 
Statement clear by showing you’ the _ first 
part of a typical program to play ODraughts 
on the VZ3800. Our ideal Draughts' program 
could start Like this: 


10 REM VZ300 DRAUGHTS 
20 GOSUB 9000: REM INITIALISE VARIABLES 
30 GOSUB &§000: REM PRINT BOARD 
40 GOSUB 7000: REM ACCEPT PLAYER MOVE 
50 GOSUB §000: REM PRINT BOARD 
60 GOSUB 5000: REM COMPUTER MAKES MOVE 
70 IF (human has not won] AND (VZ300 

has not won) THEN 30 
§0 IF (VZ300 has won) THEN PRINT "I WIN" 
90 IF (human has won) THEN PRINT "YOU WIN" 
100 END 
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You could quite a bit of thiS program 
running, and tested (such as the 
initialisation routine, printing the board 
and accepting the player's move), before you 
even turned your attention to how on-~ earth 
you were going to get the VZ3800 to make its 
move. 


You would then know — for example — that you 
would not need to waste any extra thought on 
whether or not an error in the board~ 
printing routine was the cause of odd 
output. Having tested the board subroutine 
and the player move routine, you'd know that 
the error must be in the subroutine between 
Lines 5000 and 6999, the subroutine in which 
the computer makes its move. 


AllL you need to do is put a single PRINT 
statement, such as "THIS IS VZ300 MAKING A 
MOVE" followed by a RETURN for’ incomplete 
subroutines, knowing that the program will 
accept that, and demonstrate the direction 
the program flow is following, even if whole 
sections of code have not yet been written. 


In general, I'd advise you to use _ this 
system of using a ‘master Loop! of 
subroutine catls within which you will 
‘hold' the entire program. 


I suggest you try and do as much writing of 
the program as possible before you turn- the 
computer on, even though there is a_ great 
temptation to dive straight onto the VZ and 
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start punching in code. You'tl find that 
the discipline of writing it out by hand in 
advance will serve you in good stead and 
should, in the long run, produce a better 
program than might otherwise have been~ the 
case. 


Overall, you'LlL probably end up spending up 
Less time on the program working in this way 
than you would if you began the process 
sitting at the VZ3800 keyboard, 


It took me awhile to learn this’ Lesson. 
Although I had read suggestions along the 
Lines of ‘work out exactly what you're going 
to enter before you start at the computer' 
in several books, I tended to just jump 
right in without much prior thought. 


Although I worked out rough flow charts, and 
had an idea what sort of display 
organisation I wanted, I certainly did not 
write much program out on paper before 
starting at the computer. Then, I once found 
myself stuck for a two-week period without a 
computer and ideas for several programs just 
itching to be written. I had to write them 
out in an exercise book. 


The relative ease with which the programs 
were debugged when they were eventually 


entered into the computer, and the 
complexity of the programs I wrote in this 
way (including my first Chess’ program) 


convinced me that this was the way I_ would 
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work from then on, It 18 amazing how much 
cleaner a program can be if all the’ rough 
working out is done on paper, rather than on 
the computer screen, 


When working on programs which threaten” to 
be big and involved, I tend to write the 
major ‘call subroutines Loop! first of all, 
but without Line numbers, so the program 
contains Lines Like GOSUB PRINT BOARD and 
GOSUB INITIALISE. Next, I write each module 
(or subroutine] on ae Separate’ sheet of 
paper. Then, when the major subroutines have 
been written I shuffle them into an order 
which seems most Logical. 


ALl this, of course, occurs before any Line 
numbers are written in. The subroutine 
modules are put in an order which’ ensures 
that the program structure is as Logical as 
possible. I use arrows to indicate’ the 
destination of GOTO's within a module, '= and 
names for subroutine, aS suggestion in the 


major loop. Later on, when the program has 
Started to assume a firm shape, the _ Lines 
are numbered [I usually work in tens, 


starting at tine 10) and the relevant GOTO 
and GOSUB destinations are added. 


Ail programs have an ‘end condition' at 
which point computation stops. It is worth 
putting a test for this end condition as 
part of the GOTO which sends the program 
back to start cycling through the major 
subroutine Loop. This ensures that the cycle 
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wilt continue until a particular condition 
is met, at which point the program ‘falls 
through' that GOTO and continues on to the 
Lines which signal the end of the program. 


INPUT PROMPTS 


It is very useful, when writing a progran, 
to keep in mind how the program will appear 
to a stranger when it is run by him or her 
for the first time. If there is an input 
prompt required, it is far more useful if 
the program prints up something like "HOW 
MANY HOURS HAS THE EMPLOYEE WORKED’ THIS 
WEEK?" instead of just "INSERT HOURS?" or 
the almost useless Lone question mark. 


The Same suggestion applies to print output. 
It is far better that your program is 
written so that it prints out THE NUMBER OF 
HOURS WORKED ON FULL PAY THIS WEEK 1S 27, 
rather than HOURS, FULL: 27 oar an 
unsupported e7. Of course, providing 
explicit input prompts and output PRINT 
Statements consumes memory as well as typing 
time when entering the program, but’ the 
contribution they make to the final program 
means the trouble involved is well worth it. 


While exact PRINT statements’ and input 
prompts will help a person running a program 
make sense of it, REM statements can help 
make the program clear to those who are 
examining the Listing for the first time. 
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REM statements (which are, as you_ know, 
ignored by your VZ300 when a program is run) 
should be used to help illuminate the flow 
of logic within the program, and what is 
happening in certain places within it. This 
is especially important in parts of the 
program where decisions are made, or 
calculations are carried out. 


Not only can REM statements be used _ toa 
explain different parts of the code, but 
they can also be used to provide visual 
"breaks', so that the various blocks of code 
which carry out certain tasks are visually 
separated from the rest of the program. A 
blank REM statement (the word REM standing 
alone in a program Line) can be used _ for 
this. A row of asterisks is an effective 
alternative. 


VARIABLES 


It is worth considering the use of explicit 
names for variables, using either the word 
in full (such as HOURS as a variable name in 
a payroll program for hours worked) or an 
abbreviated version of this (such as_ HR) 
which has a fairly obvious meaning. You'tl 
discover that this makes it easy, when 
working on a program, to keep track of your 
variables. This will help you with’ the 
initial debugging and Later on as well if 
you need to improve or extend the original 
program. 
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Explicit variable names also help make your 
code more ‘transparent! so other programmers 
can work out what the various parts of the 
program are intended to do. You'LlL also find 
it a great help to yourself when you” return 
to the program ata Later date. It is 
surprising how code which seemed incredibly 
clear it terms of itS puUrpose when-= you 
entered it, becomes exceedingly hard _ to 
follow when you return to it after a_ Long 
break. 


CHECKING INPUT 


Any input entered by the user’ should be 
checked by the program before it is accepted 
to ensure that incorrect data does not cause 
the program to crash at some future point. 
Whether you want string, or numeric input, 
it is often wise to allow for string input, 
which is first checked to see whether’ the 
entered material is acceptable and then, if 
necessary, the string can be changed into a 
number. 


For example, if the user needs to enter a 
number between one and nine, a string can be 
accepted and then checked to ensure that it 
is not less than "1" or more than "9" before 
being changed into a number with a command 
Like VAL. 


As well as ensuring that the program will 
reject invalid input, you should check’ the 
program to see all the inputs which it does 
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accept produce sensible answers when 
processed later on in the program. For 
example, make sure that your program does 
not accept zero as a possible number if the 
trusty VZ must Later divide by this number. 


Similarly, if numbers are to be processed by 
a functicn, and then the result of this 
processing used for division, you must check 
that an apparently valid input does not turn 
into zero as a result of evaluation by’ the 
function. 


If the information entered by the user is 
rejected, and anew input is requested, the 
Program should ideally point out why~ the 
original input was not suitable, or spell 
out again exactly what is required (such as 
"ENTER A NUMBER BETWEEN 1 AND 4"). You risk 
making users angry if input which appears 
valid 1s continually rejected without 
apparent reason. 


DOCUMENTATION 


The written material which accompanies’ a 
program is often called documentation. If 
you're preparing programs to be used by 
other people, it 18 very useful for’ those 
programs to be supported by some documen- 
tation, however sketchy. 


The written information should explain, of 
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course, what the program does, then go on to 
outline the flow of action within’ the 
program. The documentation should alert the 
user as to the kind of actions which will be 
required from him or her when running’ the 
program, and give an indication of the kinds 
of user input and reaction which will be 
accepted. 


The format of the final output should = also 
be discussed. A List of variable names can 
be included, 


If there are ways in which the program can 
be developed, extended or improved, 
suggestions along these Lines can be added 
to the documentation. Written references toa 


any material which will help in 
understanding the algorithms used, or _ for 
giving suggested areas for program 


development, should also be included. 


Documentation for amajor program’ should 
start with an introduction which quickly 
explains what is going on, and tells how to 
use the progran. The later parts of the 
documentation can then discuss the program 
in greater detail. It is not good practice 
to force the user to wade through ae vast 
amount of information in order to dig out 
the vital facts he or she needs to get’ the 
program running. 
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It is really rather pointless writing great 
programs, or typing in programs from books 
Like this one, and then not saving them on 
cassette or disk before you turn your VZ800 
off. If you don't save the program, it is 
Lost when you turn off the power, and-= you 
have to start all over again when you next 
want to use the computer. 
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To connect up a cassette player, using 
either your own cassette, or the special one 
for the VZ provided by Dick Smith 
Electronics, use the cords which come with 
your computer. Connect them up as shown in 
the diagram. 


COMPUTER CASSETTE RECORDER 
BACK OF UNIT 





[ 
RED 


To save a program on cassette, so you’ can 
use it again, you have to give the program a 
name. This name can be from one to 16 
characters’ tong, so MYPROG, A4, Z_ and 
SAUSAGESANDSAUCE are all valid names. The 
important thing is that the file name must 
Start with a letter, rather than a number or 
symbol. 


SAVING A PROGRAM 


You put the cassette in your recorder, make 
Sure the tape is past the blank’ leader 
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portion, then type in on your VZ: 
CSAVE "NAME" 


Of course, you put your own name for the 
program in place of the word NAME. Then, 
start the cassette player, in record mode, 
and once the tape is rolling, press’7 the 
RETURN key on your VZ. The flashing cursor 
will vanish while the save takes place. Once 
the cursor re-appears, the program has been 
saved on cassette. It iS Suggested that you 
Save each program two or three times, just 
to make sure you have a version of it which 
wilkL Load successfully next time. 


VERIFYING A PROGRAM 


To check the program on the tape, before you 
NEW your VZ3800, rewind the tape to the 
position it had just before the recording 
began. Type in: 


VERIFY "NAME" 


Then, press the PLAY button = on your 
recorder, and the RETURN key on the VZ. The 
computer will compare the program on tape 
with the one in your computer's memory, and 
if they are the same, will print up the 
message VERIFY OK. This ensures’ that you 
have an uncorrupted version of the program 
on tape. 
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LOADING A PROGRAM 


To get a program from tape back into your 
VZ300, set the tape up so it is just before 
the start of the program. [To make it easier 
to: do this, you might Like to precede the 
Saving of a program with aée$short' voice 
announcement, so you know which program is 
coming next. If you do, make sure you dis-— 
connect the microphone before saving the 
program.) 


Then, type in: 
CLOAD "NAME" 


Now press the play button on your’ recorder 
and the RETURN key on the computer. 


The message WAITING will appear on _ the 
screen while the computer waits for your 
program on the tape. When it appears, you'll 
see the words FOUND T: NAME as other 
programs are Located. The message LOADING T: 
NAME means the program name you have 
specified has been located, and is now 
Loading into the VZ300. 


ATTACHING A DISK DRIVE 


While cassettes have the advantage of being 
very cheap as a means of storing programs, 
they are slow to load and save, and somewhat 
unreliable. Disks, by contrast, are not so 
cheap, but load virtually instantly, and 
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with close to 100% reliability. 


To connect the X-7302 disk drive to your 
VZ3800, you need the floppy disk controller 
(X-7304} and a 16K memory expansion'§ module 
(X-7306). You start by turning the power off 
to your computer, then sliding the disk 
controller cartridge into the slot at’ the 
back of the computer. Next, you plug your 
16K for 64K) memory expansion unit into the 
Slot at the top of the disk controller. 





Then you plug the connector on the “flat 
cable provided with the disk drive into the 
controller socket marked DRIVE 1, connect 
the separate power supply to the disk drive, 
and then turn on the power to the disk 
drive, and the power to your VZ300. 
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If you have a second disk drive, you plug it 
into the socket marked DRIVE 2, before 
turning on the power. 


Once you do turn on the power, the message 
on the screen will read: 


VIDEO TECHNOLOGY 
DOS BASIC V1.2 


READY 


If you do not get this message, turn off 
power to all units, and go through the 
procedure again, making sure you are always 
gentle when sliding parts into each other. 


USING DISKS 


Once you have the system up and running, you 
Can experiment by saving a program. Open the 
disk drive door, by first turning the Little 
handte upwards to make room for the disk, 
and after you've inserted the disk, turn the 
little handle down again. 


Pa a= <= the disk drive door is 
— id OPENED 





| the disk drive door is 
en a CLOSED 


aes 
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You need to format a disk before it can be 
used. To do this, get a blank disk, or one 
which you no longer need (because formatting 


disk drive door 


4 
SS Label 


wipes everything off a disk}, and place it 
in your disk drive. 


Now type in: 


INIT 


This stands for ‘'initialise'. Once you’ do 
this, and press RETURN, the red Light will 
come on and you'll be able to hear the disk 
spinning around inside the drive. Never, 
ever try to remove a disk from the drive 
when the red light is on. 
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SAVING PROGRAMS TO DISK 


Once you have an initialised disk, you can 
use it to Save a program on. 


Whereas with cassettes you used the command 
CSAVE "NAME", you leave the 'C' off, and 
Simply enter: 


SAVE "NAME" 


The red Light will come on, the drive will 
make a few sounds for a second or two, and 
then the word READY will appear to show you 
the process is complete. Note that, unlike 
when you work with cassettes and files can 
be up to 16 characters tong, the file name 
for a disk file cannot be more than eight 
characters Long. 


GETTING THE PROGRAM BACK 


It is very simple to Load in a program’ (from 
disk. You just type in: 


LOAD "NAME" 


After a few seconds of sound from the drive 
as the red Light comes on, the word READY 
will appear on the screen to show you that 
the program has loaded. If you have only 
ever used cassettes you'll be extremely 
impressed by the incredible speed with which 
disks work. 


Then, to run a program, you just type in. RUN 
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as normal, and the program will run. If you 
want to avoid this step, then, instead of 
LOAD "NAME" you type in: 


RUN "NAME" 


This will ensure that the program runs auto- 
matically, once it has loaded. 


WHAT'S ON THE DISK? 


The word DIR (which is short for 'directory' 
is used to discover which programs you have 
on your disk. When I typed in DIR, and then 
pressed RETURN with one of the disks I 
developed when writing this book, I saw the 
following on the screen: 


T: TEMP 

T: TEMP1 
T: GOLF 

T: REACTION 
T: SPIRO 
T:LISSA=1 
T:LISSA-2 
T:MARTIAN 
T: SKETCH 
T: TRAPPER 
T:MEZOIC 
T:VWING 
T: LIFE 


To find out how much space you have Left on 
your disk, you enter the word STATUS. When I 
did it with my program disk still in place, 
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the following meSsage came up on my screen: 


STATUS 
537 RECORDS FREE 
67.125K BYTES FREE 


OTHER DISK COMMANDS 


The other two commands you're going to need 
when working with disks are as follows: 


REN 


REN is used to rename a file on disk. To use 
it, you type in: 


REN "“OLDNAME","NEWNAME" 


Then, when you next do a DIR, you'll see 
that the file is not Listed under its 
criginal name, but now appears in the 
directory under the new name. 


ERA 


You use this to wipe an unwanted file from 
your disk. As it is impossible to save a 
file of the Same name as another one on the 
disk, you may want to erase an earlier 
version of the program to make room for” the 
newer one. To use, just enter: 


ERA "NAME" 
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Your next DIR will show that the file has 
been wiped. 


TAKING CARE OF DISKS 


There ere a few commonsense rules for 
Looking after the disks you use with your 
VZ300 which will ensure you get the maximum 
value out of them. It will also reduce the 
chance of losing valuable data through 
damage to a disk. 


if anything happens to the disk - such as it 
getting bent or having something spilled on 
the outer cover (and not into the disk 
itself), repair the damage as best you can, 
and make a copy of the disk immediately. 
Then discard the original disk. 


If you put a contaminated disk in_ your 
drive, you run the risk of damaging the 
read/write head. 


Don't touch the part of the disk which shows 
through the slot in the outer cover, and 
don't put anything {such as cups of coffee, 
ash trays, copies of the Dick Smith cat- 
alogue or other heavy books) on top of 
either the disk, or the cardboard cover. 


THE NASTY MAGNETIC FORCE 


Magnetism can corrupt data on a disk. If you 
have anything which is, or could be, 
magnetised, such as radio speaker, a pair of 
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scissors, or a telephone handset, keep it 
well away from your disks. 


Disks, as I guessed you've realized by now, 
are pretty sensitive creatures. They don't 
Like heat too much, so Leaving them in the 
car while you go surfing iS going to cause a 
few problems. Disks work best in the range 
10 to 51 degrees Celsius. If a disk -is 
exposed to temperatures outside this range, 
leave it for at least half an hour to adjust 
to room temperature before putting it in the 
disk drive. 


You should never bend disks, or use rubber 
bands, adhesive tape or paper clips on them. 


If you want to write on the cardboard outer 
sleeve, take the disk out first. Write on 
the Label, which you are going to stick an 
the cisk itself, before you stick it in 
place. If you have to add something Later, 
write gently, and with a felt-tipped pen. 
Don't use a biro or sharp pencil. 
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TIM HARTNELL TAKES THE BYTE 
OUT OF PROGRAMMING YOUR VZ300! 


Now you can learn to program your Dick Smith VZ300 Personal 
Colour Computer in a matter of hours. Tim Hartnell leads you step-by- 
step in this complete guide for the first-time programmer (plus there’s 
quite a bit of material for those with previous computer experience). 


You start to program your VZ300 by writing and playing games, so you 
can have fun while you’re learning! 


In Chapter One, you'll take your first steps in programming, and 
discover that you already know a number of words in the BASIC 
programming language. 


By the end of Chapter Three, you'll have run several complete 
programs, and be in full control of the material your VZ300 is printing 
on the screen. 


You go on to roll dice with the VZ’s random number generator; loop 
the loop with FOR/NEXT loops; read, write and compare data; and use 
sound and graphics to enhance your programs. After this, you'll take 
real control of your VZ300 with programming commands such as PEEK 
and POKE. 


Finally, you'll discover how to create your own moving graphics and 
write animated arcade games! 


This book includes a generous collection of VZ300 game 
and demonstration programs, including MASTERMIND, 
STAR COLONY, REACTION TEST, GOLF, THE 
PHANTOM COMPOSER, SPIROGRAPH, LISSAJOUS 
CURVES, TRAPPER, MESOZOIC ATTACK and V-WING 
SPACE BATTLE. 

Come on in, the programming’s fine! 


X-7326 


